Program chik; var a:array[1..10000]of integer; n,i:integer; begin read(n); for i:=1 to n do begin read(a[i]); a[i]:=a[i]-20; end; for i:=1 to n do write(a[i],' '); end. Обычно за 5б я не решаю но ты мне понравилась..
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.