Написать программу на языке программирования Паскаль 1. Найти разность, сумму и произведение двух значений переменных. 2. Ввести два числа. Вычесть из большего меньшее.​

1.

var

 a,b:real;

begin

 read(a);

 read(b);

 writeln(a-b);

 writeln(a+b);

 writeln(a*b);

end.

2.

var

 a,b:real;

begin

 read(a);

 read(b);

 if a>b then writeln(a-b) else writeln(b-a);

end.