Встречено ';', а ожидалось ')'

@MegaTupoiChel · Регистрация: 15.09.2020

Pascal

program labanumberone;
const e=2.71828;
var x,f:real;
begin
x:=(-9);
while x<=8 do
begin
if x<(-7) then 
f:=cos(x)/cos(x)-x*x/exp(ln(x)*(0.1*x));
writeln ('x=',x,'f=',f);
x:=(x+0.3);
if (-7)<=x<(-3) then 
f:=(exp(ln(x)*(0.1*x))/sin(x);
writeln ('x=',x,' f=',f);
x:=(x+0.3);
if (-3)<=x<6 then 
f:=x;
writeln ('x=',x,' f=',f);
x:=(x+0.3);
if 6<=x then 
f:=(e^(x))/(exp(ln(x)*(1/3))-28/lg(x);
writeln ('x=',x,' f=',f);
x:=(x+0.3);
end;
end.

В 13 строчке пишет такую ошибку, не вижу в чём проблема (программа, конечно, ещё совсем не доделана, но если есть советы, то буду рад подсказкам, а то я вообще пень полный пока что)

@mr-Crocodile · 15.09.2020, 11:35

скобка перед exp лишняя
или убери её или в конце добавь закрывающую

и в 21 строке такая же беда - тут, скорее всего, нужно в конце добавить:

Pascal

21	f:=(e^(x))/(exp(ln(x)*(1/3))-28/lg(x));

ну это смотря что у тебя в знаменателе

Добавлено через 3 минуты
а ещё в 12 строке нельзя так сравнивать.
ты, наверное, так хотел написать:

Pascal

12	if (-7<=x) and (X<-3) then

Добавлено через 4 минуты
и ещё в 16 и ещё в 18 строке и ещё в 21 ошибки...

мда..

так:

Pascal

program labanumberone;
 
var
  x, f: real;
 
begin
  x := -9;
  while x <= 8 do
  begin
    if x < -7 then
      f := cos(x) / cos(x) - x * x / exp(ln(x) * (0.1 * x));
    writeln('x=', x, 'f=', f);
    x := x + 0.3;
    if (-7 <= x) and (x < -3) then
      f := exp(ln(x) * (0.1 * x)) / sin(x);
    writeln('x=', x, ' f=', f);
    x := x + 0.3;
    if (-3 <= x) and (x < 6) then
      f := x;
    writeln('x=', x, ' f=', f);
    x := x + 0.3;
    if 6 <= x then
      f := (exp(x)) / (exp(ln(x) * (1 / 3)) - 28 / (ln(x) / ln(e)));
    writeln('x=', x, ' f=', f);
    x := x + 0.3;
  end;
end.

@MegaTupoiChel · 15.09.2020, 11:41 **[ТС]**

Спасибо большое! По ходу дела остальное доработаю)

@MegaTupoiChel 0 / 0 / 0 Регистрация: 15.09.2020 Сообщений: 8
	15.09.2020, 11:41 [ТС]	3
	Спасибо большое! По ходу дела остальное доработаю) 0

Опции темы

Встречено ';', а ожидалось ')'

Решение