Не работает программа ** Pascal. Почему?program z;var n,i,a,b,r:...

0 голосов
19 просмотров

Не работает программа на Pascal. Почему?program z;var n,i,a,b,r: integer;begina:=0;b:=0;writeln('Введите число учеников');readln(n);for i:=0 to n dowhile i<>n dobeginwriteln('Введите рост ученика');readln(r[i]);if r[i]>170 then inc(a) else inc(b);end;writeln('Подходят ',a,'учеников');writeln('Неподходят ',b,'учеников');end.


Информатика (12 баллов) | 19 просмотров
Дан 1 ответ
0 голосов

Отсутствует массив как таковой


(654k баллов)