program zadacha;
var m,h,g,F:real;
begin
g:=9.8;
readln(m);
readln(h);
F:=m*g*h;
write(F);
end.
Объяснение:
program zadacha;
var m,h,g,F:real;
begin
g:=9.8;
readln(m);
readln(h);
F:=m*g*h;
write(F);
end.
Объяснение: