Составить программу для ввода с клавиатуры некоторого массива чисел типа integer или real с правильным диалогом программы и пользователя. на всякий случай: имена переменных в программах у обучающихся совпадать не должны. также следует обеспечить диалог с пользователем. в программе обязательны ! комментарий по ходу выполнения программы давать вразумительный
Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('Количество элементов в массиве:');
var a:=ReadArrReal('Вводите элементы массива через пробел или Enter',n);
Writeln('Ввод завершен')
end.
Пример
Количество элементов в массиве: 5
Вводите элементы массива через пробел или Enter 3.5 7 -2.9 0.4 11.345
Ввод завершен
const
maxn = 100;
type
myarr = array [1..maxn] of integer;
var
a: myarr;
n, i: integer;
begin
writeln('Введите размер массива:');
readln(n);
writeln('Введите массив:');
for i := 1 to n do
read(a[i]);
end.