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

1

Ответы и объяснения

2013-10-17T20:45:23+04:00
Var a, b: integer;
begin
readln(a, b);
writeln('sum is ', a + b);
writeln('разность - ', a - b);
writeln('average - ', (a + b) / 2);
end.