Регистрация
lailylaily
18.11.2021 14:25
Информатика
Есть ответ 👍

Составить в ку бейсике снеговика и грозовик

187
367
Посмотреть ответы 2

Ответы на вопрос:

kcenigolovaxa
kcenigolovaxa
4,5(8 оценок)
Screen 7 center = 50 radius = 10 qr = .017 for i = 1 to 3 circle (50, center), radius, 15 center = center + radius * 2 radius = radius + 5 next i for i = -1 to 1 step 2 line (50 + i * 10, + i * 40, 70), 15 pset (50 + i * 2, 45) line (50, 50 + i * , 50), 12 next i circle (50, 50), 7, 15, 210 * qr, 330 * qr
829ld4b
829ld4b
4,5(6 оценок)
Program enot; var x: integer;   y: real; begin write('введите х:   '); read(x); y: = (1-x*x+2.5*x*x*x+x*x*x*x)*(1-x*x+2.5*x*x*x+x*x*x*x); write(y); end.

Популярно: Информатика