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

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

Форум программистов > Центр помощи > [Pascal]Вывести на экран таблицу, значений функции

Автор: lazygirl90 5.5.2011, 17:56

Помогите с задачей,никак не получается сделать :((
Построить массив значений функции y=sqrt(x*x*x-5)/(x*x+2)) на интервале [5,10] с шагом 0.2. На экран вывести результат вычислений в виде таблицы.
Пример таблицы :

Автор: Silent 5.5.2011, 19:48

а где функция-то?? если Вы так относитесь к формулировке задачи, то что ждете в ответ?

Автор: lazygirl90 5.5.2011, 19:55

Цитата(Silent @ 5.5.2011, 19:48)

а где функция-то?? если Вы так относитесь к формулировке задачи, то что ждете в ответ?

Отредактировала,не увидела что не написала функцию...

Автор: Silent 6.5.2011, 11:32

Вот и умничка, держи пряник:

Код


uses crt;
var x, y:real;
begin
clrscr;
x:=5.0;
while (10.0 - x > 0.0) do begin
  y:=sqrt(x*x*x-5)/(x*x+2);
  writeln('x=',x:0:3,' y=',y:0:3);
  x:=x+0.2;
end;
ReadKey;
end.

компилятора под рукой нет, проверить правильность не смог, но все должно работать аки часики

Автор: lazygirl90 6.5.2011, 11:59

Цитата(Silent @ 6.5.2011, 11:32)

Вот и умничка, держи пряник:

Код


uses crt;
var x, y:real;
begin
clrscr;
x:=5.0;
while (10.0 - x > 0.0) do begin
  y:=sqrt(x*x*x-5)/(x*x+2);
  writeln('x=',x:0:3,' y=',y:0:3);
  x:=x+0.2;
end;
ReadKey;
end.

компилятора под рукой нет, проверить правильность не смог, но все должно работать аки часики

Спасибо за помощь ) smile