поправить код паскаля, пожалуйста

[mishammm]

Условие: (на картинке тоже)
Разработать алгоритм и записать программу вычисления значения функции с заданным шагом на указанных промежутках.

Требования к программе:
- Границы с области определения функции и шаг изменения аргумента ввести состояние стандартном процедурой введения;
- Вывести в виде таблицы пары чисел: (аргумент, значение функции).

Сам код:

Program laboratorna;
var
     v,x,deltav:real;
     begin
  If (v<1) then
  begin
deltav:=0.1
  while(v<1) do
   x:=exp(v * ln(1.26)) + v;
   end;
   else
   If (v<4) then
   begin
   while  (v<4) do
   x:= pi/2-arctan(v+0.4);
   end;
   v=v+deltav
   Writeln('v= , v , 'x=' ,x);
   Readln
   End.

Ошибка: error in statement указывает на строку else

[Вадим Мошев]

Уберите точку с запятой перед else

[mishammm]

что то не так:
исправленный код:

Program laboratorna;
var
     v,x,deltav:real;
     begin
     Writeln('VVedi v');
     Readln(v);
     deltav:=0.1;
  If (v<1) then
  begin
  while(v<1) do
   x:=exp(v * ln(1.26)) + v;
   end
   else
   If (v<4) then
   begin
   while  (v<4) do
   x:= pi/2-arctan(v+0.4);
   end;
   v:= v+deltav;
   Writeln('x=',x);
   Readln
   End.

[eval]

условия какие? а вы что вгоняете?

[mishammm]

я уже толком не шарю, устал немного я так понял я должен ввести v из промежутка и вывести x но все равно лабуда с этими 0 получаеться

[Serge_Bliznykov]

может быть, так надо?

program laboratorna;
var
  v, x: real;
  vnach, vkon, deltav: real;
begin
  vnach := 0;
  vkon := 4.0;
  deltav := 0.1;

  Writeln('Vypolnaem cykl dlyu v nachalnoe = ', vnach: 1: 1,
    ' v kon = ', vkon: 1: 1, '  shag = ', deltav: 1: 1);

  v := vnach;
  while v <= vkon do begin

    Write(' v = ', v: 1: 1, ' x = ');

    if (v < 1) then begin
      x := exp(v * ln(1.26)) + v;
      WriteLn(x: 1: 7);
    end
    else
      if (v < 4) then begin
        x := pi / 2 - arctan(v + 0.4);
        WriteLn(x: 1: 7);
      end
      else
        WriteLn(' neopredeleno ');
          v := v + deltav;
  end;

  Readln
end.

[Вадим Мошев]

mishammm
Вот, вам Serge_Bliznykov всё правильно написал. Значение v вводить не надо. У вас просто табулируется функция x(v), где изменяется автоматически с заданным шагом в заданных диапазонах.