Найти средний рост 32 учеников .
5-9 класс
|
Нужно написать программу!
var
mas:array[1..32] of real;
i,k:integer;
sum:real;
begin
for i:= 1 to 32 do
begin write('Введите рост ',i,' ученика'); readln(mas[i]) end;
writeln;
sum:=0;
k:=0;
for i:= 1 to 32 do
begin sum:=sum+mas[i]; k:=k+1 end;
write(sum/k)
end.
Другие вопросы из категории
решить такую задачу:
Файл размером 100 МБ начинает передаваться с файлового сервера на смартфон через школьное WiFi-соединение
со скоростью 8192 кБит в секунду 1,5 минут.
Затем WiFi-роутер отключили, а остаток файла пришлось получать некоторое время посредством платной 3G-связи.
Определите в какую сумму пользователю обойдётся скачивание файла, если стоимость 1 КБайта составляет 10 копеек.
задачи в паскале
кодом КОИ-8? все тома меют однаковые количества станиц, на одной странице помещаются 64 строки. строка состоит из 64 символов
2)Сколько бит игформации получено из сообщения ''Мой друг живет на 8 этаже'' , если в доме 16 этажей?
Читайте также
человека: у одного рост 2,5 аршина, у второго – 32,2 вершка, у третьего – 198 см. Найти средний рост.
(Справка: 1 аршин = 16 вершкам = 71,12 см)
Найти средний рост класса. Написать программу. 10 человек
Самый наименьший рост 162 самый высокий 170
для каждого фигуриста, сумму балов для каждого фигуриста. Массив заполняется рандомом (желательно небольшие числа), кол-во фигуристов вводится с клавиатуры + найти победителя (максимальный средний балл)
пятиклассников (двухзнач.)Найти среднюю скорость чтения в 5 классе.