Опубликовано 09.06.2017 по предмету Информатика от Гость >> <<

Создать одномерный массив, состоящий из целыхчисел. Элементы массива вводятся с клавиатуры

Ответ оставил Гость

var mas:array[1..10] of integer; i:integer;
begin
writeln(Введите элементы массива);
for i:=1 to 10 do
readln(mas[i]);
for i:=1 to 10 do
writeln(mas[i]);
readln;
end.