Аватар
Информатика, опубликовано 2018-08-22 22:30:16 by Гость

Информатика массивы заполнить массив 10 элементами с клавиатуры и вывести его на экран вывести на экран элементы равные индексам.

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

For i:=1 to 10 do 
 begin
 read (a);
 mas[i]:=a;
 end;
writeln (числа равные индексам:);
for i:=1 to 10 do if mas[i]=i then write (mas[i]);

Вопрос
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.