Даны 2 положительных числа. Найти сумму, разность и среднее арифмотическое.

Question

Даны 2 положительных числа.
Найти сумму, разность и среднее арифмотическое.

Answer 1

Var a, b: integer;
begin
readln(a, b);
writeln('sum is ', a + b);
writeln('разность - ', a - b);
writeln('average - ', (a + b) / 2);
end.