Задача Составить таблицу значений функции

[KARTER]

Составил код задачи ,но она не работает хотел бы ухнать ошибку!!!

program E10;
var x,y:real;
begin
X:=2;
while x <=7 do
begin
y:=sqrt(sqr (sin (x)/cos(x))*(x/5)+2*sqrt(x)+3);
writeln ('x=',X:8:2,'y=',y:8:2);
x:=x+0.56;
end;
readln
end.

[Irusik]

после readln точка с запятой нужна, и в уравнении не хватает одной скобки

[KARTER]

Если пишешь 2 скобки после уравнения программа выдаёт ошибку

[KEA0301]

А откуда ты знаешь что у тебя ошибка? И с чего это она не работает, если нормально работает?

[p51x]

А откуда ты знаешь что у тебя ошибка?

sqrt(sqr (sin (x)/cos(x))*(x/5)+2*sqrt(x)+3);

До 3 считать в школе научили? Посчитайте открывающие и зыкрывающие скобки.

[KEA0301]

Сообщение от p51x

sqrt(sqr (sin (x)/cos(x))*(x/5)+2*sqrt(x)+3);

До 3 считать в школе научили? Посчитайте открывающие и зыкрывающие скобки.

Да. Ну, все нормально 6 открывающих, 6 закрывающих, в чем проблема?

[KARTER]

Все норм всем спасибо