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

1

Ответы и объяснения

  • JaK0
  • середнячок
2013-11-26T22:09:11+04:00
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;