Предмет: Информатика,
автор: nika7774
Паскаль
Герон
Что здесь неверно?
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.
Ответы
Автор ответа:
0
В конце readln не требуется, тк считывать нечего.
И чтоб не было некрасивого числа в конце допиши "writeln('площ. треуг.s=',s:3:2 );
И чтоб не было некрасивого числа в конце допиши "writeln('площ. треуг.s=',s:3:2 );
Похожие вопросы
Предмет: Русский язык,
автор: jkdkjskskdjj2
Предмет: Химия,
автор: funnilin
Предмет: Математика,
автор: Аноним
Предмет: Биология,
автор: ozal26