Есть ответ 👍

Зашифровать пословицу о труде

103
498
Посмотреть ответы 2

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


ответ:2 6 9 без

20 18 21 5 1 труда

15 6 не

3 29 13 16 3 10 26 30 выловишь

10 и

18 29 2 12 21 рыбку

10 9 из

17 18 21 5 1 пруда

Объяснение:

Clime
4,7(23 оценок)

Держи! 1) var i,n,result: integer; begin read(n); result: =0; for i: =1 to n do begin     result: =result+i; end; write(result); end. 2) var i,n,increase,result: integer; massive =  array[1..1000] of integer; // ищем  делители в диапазоне 1-1000 begin read(n); for i: =1 to 1000  do begin     if((n mod  massive[i])=0) then     begin         increase: =increase  +  1;     end; end; result: =increase; write(result); end.

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