/
spirzen
/
it-code-examples
Обзор
Документация
Войти
/
spirzen
/
it-code-examples
Код
Запросы
0
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
examples/pascal/lab-1140-008/main.pas
21 строка
316 B
Spirzen
Code migration pack
09 июн 2026, 01:41
09 июн 2026, 01:41
cebc284
Код
Авторство
О чём код?
program ReverseArray; var n, i, tmp: integer; a: array[1.1000] of integer; begin ReadLn(n); for i := 1 to n do Read(a[i]); ReadLn; for i := 1 to n div 2 do begin tmp := a[i]; a[i] := a[n - i + 1]; a[n - i + 1] := tmp; end; for i := 1 to n do Write(a[i], ' '); WriteLn; end.