Error 89

[Birs]

Вот весь текст программы:

program lab;
var
xa,ya,xb,yb,xc,yc,s,ab,bc,ac:real;
begin
s:=0;
writeln('Введите координаты точек A[x,y], B[x,y], C[x,y]');
read(xa,ya,xb,yb,xc,yc);
ab:=sqrt(sqr(xa-xb)+sqr(ya-yb));
bc:=sqrt(sqr(xb-xc)+sqr(yb-yc));
ac:=sqrt(sqr(xa-xc)+sqr(ya-yc));
s:=(ab+ac+bc)/2;
s:=sqrt(s*(s-ac)(s-ab)</em>(s-bc));
writeln('Площадь= ',s:10:4);
end.

В строке s:=sqrt(s*(s-ac)(s-ab)</em>(s-bc)); выдает ошибку 89 помогите что не так? Все правильно должно быть! За ранее спасибо!


________
Код нужно оформлять по правилам:
тегом [CODE]..[/СODE] (это кнопочка с решёточкой #)
Не забывайте об этом!
Модератор.

[Terran]

У вас не правильно записана формула s:=sqrt(s*(s-ac)(s-ab)</em>(s-bc));
Уточнике какая формула должна быть.
И что это '</em>' ?

[Birs]

Разобрался в строке s:=sqrt(s*(s-ac)(s-ab)</em>(s-bc));
Должна выглядеть так s:=sqrt(s*(s-ac)*(s-ab)*(s-bc));
Запускается
но когда начинаю вводить числа пишет Error 106 Invalid numeric format почему?

[Terran]

Вы не правильно по всей видимости вводите числа. Вводите их так:
10 пробел 20 ентер
30 пробел 40 ентер
...
Или
10 ентер
20 ентер
30 ентер
… и т.д

[Birs]

Спасибо ввел как вы написали все заработало!

[Birs]

Если есть возможность и желание помочь, свое задание сделал, а помочь другу хотелось бы да времени уже нет вот его задание http://rghost.ru/25039681
Решать как бы вам...