Question

ДАЮ 99 БАЛЛОВ. ПРОГРАММА КУМИР (АЛГОРИТМЫ)
Дан массив из 10-ти элементов,все его элементы уменьшить на число А и вывести на экран первое и второе состояние.

Answer 1

var m:array[1..100] of integer;         i,a,n:integer; begin write('Ââåäèòå Г°Г*çìåðГ*îñòü Г¬Г*Г±Г±ГЁГўГ*: ');readln(n); write('Ââåäèòå ÷èñëî ГЂ: ');readln(a); writeln('Ââåäèòå Г¬Г*Г±Г±ГЁГў: '); for i:=1 to N do readln(m[i]); writeln('ГЊГ*Г±Г±ГЁГў: '); for i:=1 to N do M[i]:=m[i]-a; for i:=1 to N do write(M[i],' '); end.