Получить таблицу значений функции Опции

[NeiroN]

Помогите решить,я профан в паскале...или скажите где смотреть подобные!
С уважением Сергей.П.


Задание 1
Получить таблицу значений функции
на отрезке [3.5; 4] c шагом 0.1



Сообщение отредактировано: NeiroN - 17.04.2009 16:32

[Client]

uses crt;
var 
     x:real;
begin
   clrscr;
   x:=3.5;
   while x<=4 do begin
      writeln(sqrt(1+exp(sin*x)+cos*x):0:5,'   ',x:0:5);
      x:=x+0.1;
   end;
   readkey
end.

Вроде так, писал тут, паскаля нету