Составьте программу для ввода с клавиатуры в массив 7 целых целых и вывод этих чисел в обратном порядке.

1

Ответы и объяснения

2012-10-18T22:01:32+04:00

Program n1;
Uses CRT;
Const n=7;
Var a:array[1..n] of integer;
i: integer;
begin
writeln('Vvedite chisla');
For i:=1 to n do
readln(a[i]);
For i:=n downto 1 do
write(a[i]:3);
readln
end.