Задание:
Составьте программу для ввода с клавиатуры в массив 7 целых целых и вывод этих чисел в обратномпорядке.
Решение:
Program n1; Uses CRT; Const n=7; Var a: array[1… n] of integer; i: integer; beginwriteln ('Vvedite chisla'); For i: =1 to n do readln (a[i]); For i: =n downto 1 do write (a[i]: 3); readlnend.
Знаете другой ответ?