Помогите пожалуйста !!!❤️❤️❤️❤️
Program prim;
Var
a,b,S:integer;
begin
writeln('Введите сторону a:');
readln(a);
writeln('Dведите сторону b');
readln(b);
S:=a*b;
writeln('площадь равна ',S);
end.