Есть ответ 👍

Как нарисовать цифру 1 в программе кумир?

293
310
Посмотреть ответы 2

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

KimSuho01
4,5(73 оценок)

Использовать чертежник алг  нач опустить перо сместиться на вектор (0,4) сместиться на вектор (-1,-1) поднять перо сместиться на вектор (4,-3)

1. var a: array[1..30000] of integer; b,x: integer; begin for x: =1 to 30000 do begin readln(a[x]); if a[x]< 0 then b: = b+a[x]; end; end. 2. var a: array[1..30000] of integer; b,x: integer; begin b: = 1; for x: =1 to 30000 do begin readln(a[x]); if a[x] mod 3 = 0 then b: = b*a[x]; end; end.

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