program fantscrin; const n =20; var i,p:integer; c: array [1..n] of integer; begin for i:=1 to n do c[i]:=i*2 1; for i:=1 to n do write(c[i], ' '); writeln(''); p:=1; for i:=1 to n do p:=p*c[i]; writeln(p); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
