Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Object Pascal: кроссплатформенные технологии > Помогите решить задачу

Автор: Alexis_Losk 22.11.2004, 15:16

All помомгите написать прогу на Паскале которая будет реализовывать табулирование выбранной функции из заданной системы уравнений на заданном промежутке [a, b] с шагом p
http://losyanchik.narod.ru/lab2.JPG

заранее благодарен

Автор: Chuck 22.11.2004, 18:10

Ты путь к картинке проверь!
А то, не понятно, да и интерестно smile

Автор: Pakshin A. S. 22.11.2004, 19:34

Разбери этот пример:

Код


var 
 a,b,x:real;
 p:real;
begin
 readln(a,b,p);
 x:=a;
 while a < = b do
  begin
   if x < 0
    then
     writeln(sqrt(3+exp(5*ln(x))))
    else
     if x <=3
      then
       writeln('325')
      else
       writeln(sin(x)-cos(x));
    x:=x + p;
   end;
end.

Осталось только организовать вывод... smile