Ответы
Ответ дал:
0
uses crt;
var s,a,h:real;
begin
writeln('введите основание');
readln(a);
writeln('введите высоту');
readln(h);
s:=a*h;
writeln('площадь=',s:0:3);
End.
var s,a,h:real;
begin
writeln('введите основание');
readln(a);
writeln('введите высоту');
readln(h);
s:=a*h;
writeln('площадь=',s:0:3);
End.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
10 лет назад