Массив содержит рост 10 учеников 9 класса. Проверить есть ли в классе хотя бы один ученик роста 172 см и вывести его номер по списку

Question

Информатика

Плакида

26 июня, 18:27

Массив содержит рост 10 учеников 9 класса. Проверить есть ли в классе хотя бы один ученик роста 172 см и вывести его номер по списку

+2

Ответы (1)

Знаете ответ?

Калидка · Answer 1

Program one;

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

i:integer;

begin

for i:=1 to 10 do

read (a[i]) ;

for i:=1 to 10 do

if a[i]=172 then write i;

end;