Al2017
12.11.2020 20:04

Найдите среднее арифметическое суммы из 8 введенных с клавиатуры

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
ninaschemetowa
09.10.2020 19:55

var i,s,a: integer;

begin

for i:=1 to 8 do

begin

readln (a);

s:=s+a

end;

writeln;

writeln ('Среднее арифметическое: ',s/8)

end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота