Перепишите Программу на Языке Паскаль Исправив Ошибки

y = ( 1- x2 + 5x )2, где x - данное целое число.

Program primer

Var a, b: integer;

Begin ;

ReadLn( a, b);

s=a+b;

m:=a*b;

d:=a:b;

WriteLn(s);

WriteLn(m);

WriteLn(d)

End

а) y=x10 б) y=x15

Постараться использовать минимальное количество дополнительных переменных.

Например, если до обмена было: a=1, b=2, c=3, то после обмена должно стать: a=2, b=3, c=1.