Опубликовано 10.06.2017 по предмету Информатика от Гость >> <<

Паскаль
Герон
Что здесь неверно?
program Geron;
var a, b, c: integer; p, s: real;
begin
writeln(введите стороны треугольника a, b, c);
readln (a, b, c);
p:=(a+b+c)/2;
s:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln(площадь треугольника s=, s);
readln
end.

Ответ оставил Гость

В конце readln не требуется, тк считывать нечего.
И чтоб не было некрасивого числа в конце допиши "writeln(площ. треуг.s=,s:3:2 );