45

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

eugenecheban 31 марта 2023

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

категория: информатика

83

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.

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

Знаете другой ответ?
Другие вопросы по информатике

ПОПУЛЯРНОЕ
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...