Предмет: Информатика,
автор: Elmir03042003
Пожалуйста, срочно!!! Составить программу, которая запрашивает три целых числа и вычисляет сумму этих чисел, среднее арифметическое этих чисел.
Ответы
Автор ответа:
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.
Похожие вопросы
Предмет: История,
автор: vliza2209
Предмет: Математика,
автор: sher1685
Предмет: Русский язык,
автор: lizakazberovacom
Предмет: Обществознание,
автор: 125798
Предмет: Математика,
автор: mallinhappy1313