Завдання 1. Вимагається обчислити М значень функції F=SIN(1/X), для кожного значення Х, за умови A<X<B.
Метод рішення задачі.
Значення функції F=SIN(1/X) обчислюватимемо М раз, причому для кожного разу значення величини Х повинне мінятися в межах від значення змінної А до значення змінної В.
Отже, необхідно знати крок зміни величини Х в заданих межах, тобто
Н=(В-А)/М.
Оскільки обчислення значення функції і зміна значення Х для кожного разу виконуються з використанням одних і тих же виразів для вирішення даної задачі застосуємо цикл з наступною умовою. При складанні алгоритму вважатимемо, що обчислення виконуються доти поки значення змінної Х не досягне граничного значення.
1. Опис рішення задачі
Задача: Обчислити М значень функції F=SIN(1/X), для кожного значення Х, за умови A<X<B.
Дано: Х – параметр циклу, допоміжна величина для визначення значення функції
Н – числовий вираз кроку зміни величини Х
А – початкове значення величини Х
В – кінцеве значення величини Х
М – кількість раз обчислень функції F
|
|
Потрібно: F –значення функції
Зв’язок: Н=(В-А)/М
F=SIN(1/X)
Х=Х+Н
При: Х>В
2. Сценарій рішення задачі
введення необхідних даних:
повідомлення “Введіть А,В,М”
введення значення змінної А,В,М
X=A; H:=(B-A)/M;
Обчислення значення функції
F=SIN(1/X)
Вивід результату обчислення
Повідомлення “F =”, F
Х=Х+Н
Кінець
3. Схема алгоритму рішення
4. Текст програми на мові програмування Паскаль
PROGRAM Z_12;
VAR
A,B,M, X,H,F:REAL;
BEGIN
WRITE (‘Input A,B,M’);
READ (A,B,M);
X:=A;
H:=(B-A)/M;
REPEAT
F:=SIN(1/X);
WRITELN('F =’,F:8:3);
Х:=Х+Н;
UNTIL X>B;
END.