Напишите программу вычисления периметра и площади прямоугольного треугольника по заданным длинам двух катетов a и b.
На языке Паскаль
Ответы
Ответ дал:
0
var a,b,c,s,p:real;
begin
Write('Введите a и b:');
Read(a,b);
c:=sqrt(a*a+b*b);
p:=a+b+c;
s:=(a/2)*b;
Writeln('Периметр: ',p);
Write('Площадь: ',s);
End.
begin
Write('Введите a и b:');
Read(a,b);
c:=sqrt(a*a+b*b);
p:=a+b+c;
s:=(a/2)*b;
Writeln('Периметр: ',p);
Write('Площадь: ',s);
End.
Ответ дал:
0
var a,b: integer;
begin
writeln('Введите а');
readln(a);
writeln('Введите b');
readln(b);
writeln('Площадь',' ' , a*b);
writeln('Периметр',' ' , (a+b)*2);
end.
begin
writeln('Введите а');
readln(a);
writeln('Введите b');
readln(b);
writeln('Площадь',' ' , a*b);
writeln('Периметр',' ' , (a+b)*2);
end.
Ответ дал:
0
а как
Ответ дал:
0
выпей гной
Ответ дал:
0
смотри не подавись украине прива
Вас заинтересует
2 года назад
7 лет назад
9 лет назад