Имеется два массива в первом имя ученика,а во втором рост. найти количество учеников чей рост больше 160

117

182

Посмотреть ответы 2

Ответы на вопрос:

kokosha11

Информатика

4,7(72 оценок)

var a: array[1..10] of string; b: array[1..10] of integer; i,n,r: integer; beginwrite('skolko chelovek'); read(n); for i: =1 to n do beginwriteln('vvedite imya ' ,i); read(a[i]); end; for i: =1 to n do beginwriteln('vvedite rost ' ,a[i]); read(b[i]); end; r: =0; for i: =1 to n do if (160< b[i]) then r: =r+1; writeln(r); end.