Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
15 декабря 2022 22:58
1022
Ребят как нарисовать сердце в кумире пжжжж срочно
1
ответ
Например, вот две программы
1) сердечко, только контур:
использовать Чертежник
цел з,т=1871
вещ а,б
алг
нач
выбрать чернила (красный)
нц для з от -1 до 1 шаг 2
нц для т от -т до т
а:=т/500
б:=0.8*((а*а)**(1/3)+з*sqrt(max(14-а*а,0)))
сместиться в точку (а,б)
опустить перо
кц
поднять перо
кц
сместиться в точку (0,10)
кон
2) сердечко с закраской:
использовать Чертежник
цел т=1871
вещ а,б,в
алг
нач
выбрать чернила (красный)
нц для т от -т до т
а:=т/500
б:=0.8*(а*а)**(1/3)
в:=0.8*sqrt(max(14-а*а,0))
сместиться в точку (а,б-в)
опустить перо
сместиться в точку (а,б+в)
поднять перо
кц
сместиться в точку (0,10)
кон
1) сердечко, только контур:
использовать Чертежник
цел з,т=1871
вещ а,б
алг
нач
выбрать чернила (красный)
нц для з от -1 до 1 шаг 2
нц для т от -т до т
а:=т/500
б:=0.8*((а*а)**(1/3)+з*sqrt(max(14-а*а,0)))
сместиться в точку (а,б)
опустить перо
кц
поднять перо
кц
сместиться в точку (0,10)
кон
2) сердечко с закраской:
использовать Чертежник
цел т=1871
вещ а,б,в
алг
нач
выбрать чернила (красный)
нц для т от -т до т
а:=т/500
б:=0.8*(а*а)**(1/3)
в:=0.8*sqrt(max(14-а*а,0))
сместиться в точку (а,б-в)
опустить перо
сместиться в точку (а,б+в)
поднять перо
кц
сместиться в точку (0,10)
кон

0
·
Хороший ответ
17 декабря 2022 22:58
Остались вопросы?
Еще вопросы по категории Информатика
Найди информационный объём (в битах) растрового изображения размером 22 x 22 пикселя, если известно, что используется палитра из 256 цветов...
1. Разработчиком языка Паскаль является: а) Блез Паскаль б) Никлаус Вирт в) Норберт Винер г) Даниэль Бриклин 2. Какая последовательность символов...
fоr i in rаngе( c, 42, d): рrint ( i, end=" " ) В результате работы этого фрагмента программы на эк...
Положение курсора в слове с ошибкой отмечено чертой: ИГРР| Чтобы исправить ошибку следует нажать клавишу: А)<Delete> Б)<Backspace> В)&l...
перевести из двоичной системы в десятичную, восьмеричную, шестнадцатиричную системы число:1000111,1101 решенье сделать дробью...