Задание:
Решите пожалуйста задачу. 1. В массив рост в см N учащихся класса (от 130 до 210 см). Вычислить суммарный рост уч-ся класса и средний рост уч-ся данногокласса в дюймах (1 дюйм=2,54 см) П О М О Г И Т Е
Решение:
Var a: array[1… 10000] of integer; i,n: integer; m,z: real; beginwriteln ('введите количество учащихся='); readln (n); for i: =1 to n dobeginreadln (a[i]); m: =m+a[i]; end; z: =m/n/2,54; writeln ('суммарный рост=',m); writeln ('средний рост (в дюймах)=',z); end.
Знаете другой ответ?