Напишите программу которая считывает два целых числа с клавиатуры. Выводит сумму, произведение и среднее арифметическое значение этих двух чисел.

Question

14 июля, 18:45

+5

Ответы (1)

Знаешь ответ на этот вопрос?

Riolo · Answer 1

Var a, b : Real;

Begin

Readln (a, b);

Writeln ('Сумма: ', a+b);

Writeln ('Произведение: ', a*b);

Writeln ('Ср. арифм: ', (a+b) / 2);

end.