подскажите пж .Задания в Паскале ,просто на бумаге написать можно.

vara,b:real;beginRead(a,b);Writeln('P = ', 2*(a+b));Writeln('S = ', a*b);Writeln('Спробуй ще')end.