program task1;

var a,b,s:real;

begin

readln(a);

readln(b);

s:=a*b;

writeln('Площадь: ', s);

end.

решение от Тутути не верно, S=a*b