Есть ответ 👍

Написать программу которая задает с клавиатуры рост 10 спортсменов из диапазона от 150 до 200см считает количество спортсменов рост которых больше 190см а также средний рост всех спортсменов

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

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


Var   a: array [1..10] of integer;   i, s, k: integer;   begin for i: =1 to 10 do   begin       writeln('рост спортсмена №',i,': ');       readln(a[i]);       if a[i] > 190 then           k: =k+1;       s: =s+a[i];   end; writeln(k, ' спортсмена(-ов) рост, которых составляет более 190 см.'); writeln('средний рост всех спортсменов составляет ', s/10,' см.');   end.

ответ:научитесь писать

Объяснение:

Популярно: Информатика