Программа предназначается для расчета площади по формуле Герона, объясните , в чем тут...

0 голосов

Программа предназначается для расчета площади по формуле Герона, объясните , в чем тут ошибка ?
program dom_zad_2;
var a, b, c, P, S: real;
begin
if (a writeln ('Значение стороны a:');
readln(a);
writeln ('Значение стороны b:');
readln(b);
writeln ('Значение стороны c:');
P:=( a+b+c )/2;
S:= sqrt(P*(P-a)*(P-b)*(P-c));
if s<0 then writeln ('Невозможно');<br> end;
end.


спросил от (43 баллов) в категории Информатика
1 Ответ
0 голосов
ответил от БОГ (194k баллов)
 
Лучший ответ

Program dom_zad_2;
var a, b, c, P, S: real; 
begin 
writeln ('Значение стороны a:');
readln(a);
writeln ('Значение стороны b:');
readln(b);
writeln ('Значение стороны c:');
readln(c);
P:=(a+b+c)/2;
S:=P*(P-a)*(P-b)*(P-c); 
if s<=0 then writeln ('Невозможно')<br>else writeln('s = ',sqrt(s):5:2);
end.

Пример 1:
Значение стороны a: 3
Значение стороны b: 4
Значение стороны c: 5
s = 6.00

Пример 2:
Значение стороны a: 2
Значение стороны b: 2
Значение стороны c: 5
Невозможно

оставил комментарий от (43 баллов)

спасибо, но , можно объяснение ?

оставил комментарий от БОГ (194k баллов)

Объяснение чего именно?

оставил комментарий от (43 баллов)

почему else, я просто не силен в информатике

оставил комментарий от БОГ (194k баллов)

Если введены числа, из которых нельзя построить треугольник, то будет выводиться сообщение об ошибке ("Невозможно"). Если треугольник можно построить, то будет выводиться площадь этого треугольгика.

оставил комментарий от (43 баллов)

Можно вас в друзья добавить ?

оставил комментарий от БОГ (194k баллов)

Недельку здесь порешаете задания и потом добавляйте.

оставил комментарий от (43 баллов)

хорошо, я буду решать каждый день )

оставил комментарий от (43 баллов)

но только примите

оставил комментарий от (43 баллов)

можно ли здесь сделать через uses crt и slnscr??

...