Нужна помощь с информатикой!!! СРОЧНО!!!
Program n_1;
var s,p,a,b: real;
begin
read(a,b);
s:=a*b;
p:=2*(a+b);
writeln (s);
writeln (p)
end.