Напишите программу, которая находит сумму, произведение и среднее арифметическое трёх целых чисел, введённых с клавиатуры. Входные данные Три целых числа вводятся в одной строке через пробелы. Выходные данные Программа должна вывести сумму, произведение и среднее арифметическое введенных чисел. Среднее арифметическое нужно вывести с точностью 3 знака после десятичной точки (ровно 3 знака с учетом округления).

Примеры

входные данные

4 5 7

выходные данные

4+5+7=16

457=140

(4+5+7) / 3=5.333

Question

Информатика

Ливия

2 октября, 15:57

Напишите программу, которая находит сумму, произведение и среднее арифметическое трёх целых чисел, введённых с клавиатуры. Входные данные Три целых числа вводятся в одной строке через пробелы. Выходные данные Программа должна вывести сумму, произведение и среднее арифметическое введенных чисел. Среднее арифметическое нужно вывести с точностью 3 знака после десятичной точки (ровно 3 знака с учетом округления).

Примеры

входные данные

4 5 7

выходные данные

4+5+7=16

457=140

(4+5+7) / 3=5.333

+3

Ответы (2)

Знаете ответ на вопрос?

Эллина · Answer 1

Program Name;

var a, b, c, s, p:integer;

F:real;

begin

readln (a) ;

readln (b) ;

readln (c) ;

s:=a+b+c;

p:=a*b*c;

F: = (a+b+c) / 3;

writeln ('s=', a+b+c) ;

writeln ('p=', a*b*c) ;

write ('F=', (a+b+c) / 3:0:3) ;

end.

Сумму обозначила буквой s

Произведение обозначила буквой p

Среднее арифметическое обозначила буквой F

Иляха · Answer 2

var a, b, c: integer;

begin

read (a, b, c) ;

writeln (a,'+', b,'+', c,'=', a+b+c) ;

writeln (a,'*', b,'*', c,'=', a*b*c) ;

writeln (' (', a,'+', b,'+', c,') / 3=', (a+b+c) / 3:4:3) ;

end.