Составить алгоритм и написать решение задачи на Паскале: Даны 3 положительных числа. Найти периметр и площадь треугольника с данными сторонами.
Ответы
Ответ дал:
0
var a,b,c,p:integer;
s,sg:real;
begin
readln(a,b,c);
p:=a+b+c; {периметр}
sg:=p/2;
s:=sqrt(sg*(sg-a)*(sg-b)*(sg-c)); {формула герона}
if s= 0 then writeln('Периметр = ',p,' Площадь = не существует') else
writeln('Периметр = ',p,' Площадь = ',s);
end.
s,sg:real;
begin
readln(a,b,c);
p:=a+b+c; {периметр}
sg:=p/2;
s:=sqrt(sg*(sg-a)*(sg-b)*(sg-c)); {формула герона}
if s= 0 then writeln('Периметр = ',p,' Площадь = не существует') else
writeln('Периметр = ',p,' Площадь = ',s);
end.
Ответ дал:
0
Для модераторов: div отвечает за деление числа, mod за остаток после деления, div здесь потому что, по фомуле герона, нам нужна полусумма 3-х сторон треугольника, для этого div и нужен
Ответ дал:
0
в языке pascal не существует такого знака деления деления "/" он заменяется словом div, это одно и тоже
Ответ дал:
0
я вас понял, извиняюсь, мало тестов сделал
Вас заинтересует
6 лет назад
8 лет назад
9 лет назад