Изображение графиков функций - Pascal

Узнай цену своей работы

Формулировка задачи:

Задача заключается в изображении графиков функций график вводится стринговой строкой а прога его рисует, так вот я не могу догнать как организавать переход от стринговой строки к мат формуле чтоб паскаль считал... помагите плз...

Решение задачи: «Изображение графиков функций»

textual
Листинг программы
[SIZE=2]
var s:array[1..3]of string;
i:integer;
st:string;
x,y:real;
begin
s[1]:='y=x';
s[2]:='y=x^2';
s[3]:='y=ln(x)';
write('st: ');readln(st);
write('x=');readln(x);
for i:=1 to 3 do
if s[i]=st then
case [/SIZE][FONT=Courier New][SIZE=2]i[/SIZE][/FONT][SIZE=2] of
1:y:=x;
2:y:=x*x;
3:y:=ln(x);
end;
[/SIZE]

Объяснение кода листинга программы

В этом коде:

  1. Объявлены переменные: массив строк s, целочисленная переменная i, строка st, вещественные переменные x, y.
  2. Задаются начальные значения для строк s.
  3. Пользователю предлагается ввести строку для сравнения.
  4. Затем пользователю предлагается ввести значение для x.
  5. Далее выполняется цикл по элементам массива s.
  6. Если значение st совпадает со значением в текущем элементе массива, то выполняется соответствующий case-условие:
    • При i=1, y присваивается значение x.
    • При i=2, y присваивается значение x*x.
    • При i=3, y присваивается значение ln(x).
  7. Код не содержит завершения программы или выхода из цикла, поэтому он будет выполняться до тех пор, пока пользователь не прервет его выполнение.

Оцени полезность:

14   голосов , оценка 4.143 из 5
Похожие ответы