Произвести обращение массива не используя дополнительных массивов

Question

Произвести обращение массива не используя дополнительных массивов

Answer 1

83

fotomaniya

26 августа 2022

var a: array[1… 100] of real; t: real; i, n: integer; begin randomize; write ('n='); readln (n); writeln ('Исходный массив'); for i: =1 to n do begin a[i]: =random (21) — 10; write (a[i], '); end; writeln; writeln ('Преобразованный массив'); for i: =1 to n div 2 do begin t: =a[i]; a[i]: =a[n — i+1]; a[n — i+1]: =t; end; for i: =1 to n do write (a[i], '); writeln; end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: