Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
0 / 0 / 0
Регистрация: 21.12.2019
Сообщений: 12
1

Сложное условие завершения цикла. Break

28.12.2019, 14:30. Просмотров 296. Ответов 3
Метки нет (Все метки)

Составить алгоритм и программу, вычисляющую значения функции до
тех пор, пока не будет пройдена некоторая характерная точка графика
функции. Значения аргумента X должны составлять возрастающую
арифметическую прогрессию с заданным начальным членом 0,1 и разностью
0,1. Установить предел изменения аргумента X=10.
Пересечение графиков функций e-x * ln(1+x); 0,5*x3 - x2 + 0,5
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
28.12.2019, 14:30
Ответы с готовыми решениями:

Сложное условие завершения цикла при работе с матрицами.
Методика выполнения работы. Составить программу, предусматривая завершение обработки матрицы при...

Сложное условие завершения цикла при работе с матрицами
Помогите пожалуйста написать программу на паскале Дана матрица А с 2 столбцами и 10...

Остановка цикла без break
For i:=1 to N-1 do begin If a>a then k1:=false; end; Выполняю проверку массива на...

Сложное условие завершения цикла
Помогите пожалуйста решить! Составить алгоритм и программу, вычисляющую значения функции с...

3
Модератор
61161 / 45849 / 31652
Регистрация: 18.05.2008
Сообщений: 110,431
28.12.2019, 17:29 2
Шаг 0.1 очень большой, лучше так.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
function f1(x:real):real;
begin
f1:=exp(-x)*ln(1+x);
end;
function f2(x:real):real;
begin
f2:=0.5*x*x*x-x*x+0.5;
end;
var x:real;
begin
x:=0.1;
while abs(f1(x)-f2(x))>0.01 do
x:=x+0.01;
write('x=',x:0:2,' f1=',f1(x):0:2,' f2=',f2(x):0:2);
end.
0
0 / 0 / 0
Регистрация: 21.12.2019
Сообщений: 12
28.12.2019, 17:53  [ТС] 3
Это немного не то, что мне нужно. 1)Предел изменения аргумента должен быть обязательно установлен. 2) Самое главное нужно в данной программе использовать принудительное завершение цикла break. 3) Шаг всё же должен быть 0.1 и программа должна выводить значение на каждом шаге.
0
Модератор
61161 / 45849 / 31652
Регистрация: 18.05.2008
Сообщений: 110,431
28.12.2019, 17:56 4
Понятно, мне что-то втемяшилось найти первую точку пересечения графиков.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
28.12.2019, 17:56

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Сложное условие цикла
Есть txt-файл с числами, каждое новое со след строки. Нужно присвоить этим числам значения...

Сложное условие цикла
Всем добрый вечер! Есть txt файл, внутри которого столбец чисел(которые, кстати, могут быть и с...

Составить условие для завершения цикла
Почему не работает цикл do-while на проверку '!='? Если проверку меняю на '==', то все работает....

Сложное условие
помогите доделать, а то что то не работает procedure TForm1.Timer1Timer(Sender: TObject); begin...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.