Опубликовано 22.08.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

Var a,b : Real;
Begin
  Readln(a,b);
  Writeln(Сумма: ,a+b);
  Writeln(Произведение: ,a*b);
  Writeln(Ср.арифм: ,(a+b)/2);
end.