Предмет: Информатика, автор: Elmir03042003

Пожалуйста, срочно!!! Составить программу, которая запрашивает три целых числа и вычисляет сумму этих чисел, среднее арифметическое этих чисел.

Ответы

Автор ответа: hodosovanton
2

var a,b,c,s:integer;

sr:real;

begin

readln(a,b,c);

s:=a+b+c;

sr:=s/3;

write(s, ' ',sr);

end.

Похожие вопросы
Предмет: Обществознание, автор: 125798