Найти ошибки в программе и заполнить пропуски (на месте … вставить необходимые слова) var a: … [1..100] of integer; n: integer; // количество элементов в массиве i: real; begin …('введите количество элементов в массиве: '); readln(n); write('введите элементы массива: '); … i: =1 to n do read(a[i]); write('вывод элементов массива: '); for i: =1 to n do write(a[i],' ');

borisrvadarya0 borisrvadarya0    1   19.09.2019 23:10    0

Ответы
Нм6шиш Нм6шиш  08.10.2020 03:17

var a: array [1..100] of integer;

var N: integer; // Количество элементов в массиве

var i: integer;

begin

write('Введите количество элементов в массиве: ');

readln(N);

write('Введите элементы массива: ');

 

for i:=1 to N do

  read(a[i]);

write('Вывод элементов массива: ');

 for i:=1 to N do

 write(a[i],' ');


Жирный выделил и ошибки и пропуски заполненные. Нужно указывать var перед определением переменой и тип данных переменой i должен быт integer так как является счетчиком 

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика