7 кл. Придумайте два числа (меньших 20) и предложите своему соседу по парте выполнить для них алгоритм <<О>> с ручной прокруткой.

var i,s: integer;

{1}begin

s: =0;

for i: =1 to 1000  do

if i mod 2=0 then s: =s+i;

end.

{2}begin

for i: =1 to 1000 do

if odd(i) then s: =s+i;

{3}a: array[1..500] of integer;

n: integer;

for i: =1 to 1000 do

if odd(i) then a[i]: =i;

n: =i;

for i: =1 to n do

s: =a[i]+s;

end.

а)400*2,5=1000кб

б)64: 2,5=25,6=25(страниц)

в)нужен диск cd-r ,cd-rw

writeln('a[',i,']=',a[i]);

readln;

end.

посадка дерева: 1.купить семя.

2.найти место для посадки.3.вскопать яму.4.посадить семя.5.закопать яму.переход улицы по светофору: 1.подойти к дороге (к светофору)2.посмотреть на цвет, который сейчас горит.3.дождаться нужного цвета.4.перейти дорогу.5.отправиться дальше.