Составить по алгоритму программу на языке программирования Pascal.
Составить по алгоритму программу на языке программирования Pascal.
Гость
Ответ(ы) на вопрос:
Гостьvar a, b, c, p: integer;
r,s : real;
begin
write(' a, b, c= ');
readln(a, b, c);
p:=a+b+c;
r:=p/2;
s:=sqrt(r*(r-a)*(r-b)*(r-c));
writeln ('s=', s, ' p=', p);
end.
Не нашли ответ?
Похожие вопросы