Question

Решите задачу с помощью языка Паскаль.​

Answer 1

Ответ:

var

a,b,R:integer;

Sr:real;

begin

read(a,b);

R:=a-b;

writeln(R);

Sr:=(a+b)/2;

writeln(Sr);

end.

Объяснение: