Question

Где в этой программе фрагмент ввода массива с клавиатуры? program zz1; var i:integer; m:array[1900..1999] of integer; // описываем массив целого типа, каждый элемент которого будет являться каждым годом XX века begin for i:=1900 to 1999 do begin write(' введите численности населения Москвы к концу ',i,'-го года '); read(m[i]); end; end.

Answer 1

for i:=1900 to 1999 do

begin

write(' введите численности населения Москвы к концу ',i,'-го года ');

read(m[i]);

end;

здесь идет повторение по всем годам, и во время повторения программа запрашивает данные за определённый год

Answer 2

Read(m[i]) ; - фрагмент ввода массива с клавиатуры

Answer 3

В данной программе фрагмент ввода массива с клавиатуры находится внутри цикла for. Вот этот фрагмент:

pascalCopy code
write(' введите численности населения Москвы к концу ',i,'-го года ');
read(m[i]);

Этот код отвечает за ввод численности населения Москвы к концу каждого года XX века и сохранение этой информации в элементе массива m[i].