Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 09.12.2014
Сообщений: 19

Найти количество k значений функции, удовлетворяющих неравенству

21.12.2014, 12:18. Показов 906. Ответов 0
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Дана функция f(x)= 5/(x+1). Найти количество k значений функции, удовлетворяющих неравенству 1<= f(x)<2. Если k>=2, то отпечатать его, если нет – отпечатать соответствующее сообщение. х[n;m]. Шаг по х=0.2. Учесть, что на 0 делить нельзя.


Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
program p2;
var
n,m,k,f,x: real;
 
begin
writeln('Введите n= ');
readln(n);
writeln('Введите m= ');
readln(m);
repeat
if x<>-1 then
begin
f:= 5 / (x + 1);
end;
if (1 <= f) and (f < 2) then
begin
k:=k+1;
end;
if k>=2 then 
begin
write(' ', k);
end
else 
begin
write('k не удовлетворяет условию ');
end;
x := x + 0.2;
until x > m;
end.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
21.12.2014, 12:18
Ответы с готовыми решениями:

Найти количество k значений функции, удовлетворяющих неравенству
Дана функция f(x)= 5/(x+1). Найти количество k значений функции, удовлетворяющих неравенству 1&lt;= f(x)&lt;2 и min среди значений функции,...

Вывести множество значений функции, удовлетворяющих условию, и подсчитать количество остальных значений
Дана целочисленная функция f(k)= K^3-25K^2+50K+1000 определена только для целых значений аргумента К. Составить программу вычисления...

Найти количество целых решений, удовлетворяющих неравенству: A < B*x + C < D.
Имя входного файла input.txt Имя выходного файла output.txt Максимальное время работы на одном тесте 2 секунды Ограничение по...

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
21.12.2014, 12:18
Помогаю со студенческими работами здесь

Найти количество целых решений, удовлетворяющих неравенству
Найти количество целых решений, удовлетворяющих неравенству: A &lt; B*x + C &lt; D. Формат входных данных: В единственной строке заданы...

Найти количество целых решений, удовлетворяющих неравенству
Найти количество целых решений, удовлетворяющих неравенству: A ≤ B*x + C ≤ D. Формат ввода В единственной строке заданы четыре целых...

Найти количество целых решений, удовлетворяющих неравенству: A ≤ B*x + C ≤ D.
Найти количество целых решений, удовлетворяющих неравенству: A ≤ B*x + C ≤ D. Формат входных данных: В единственной строке заданы...

Вывести множество значений функции, удовлетворяющих условию, и подсчитать количество остальных значений
Целочисленная функция F(k)=k*k*k-25*k*k+500*k+1000 определена только для целых значений аргумента К. Составить программу вычисления...

Найти произведение элементов вектора удовлетворяющих неравенству
Добрый вечер! Помогите пожалуйста написать задачу на языке С++ Пропустил тему циклов, не знаю с чего начать,а решение нужно уже на...


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

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Новые блоги и статьи
Настройки VS Code
Loafer 13.04.2026
{ "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .
Оптимизация кода на разграничение прав доступа к элементам формы
Maks 13.04.2026
Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений
Maks 12.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .
Архитектура слоя интернета для сервера-слоя.
Hrethgir 11.04.2026
В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
Подстановка значения реквизита справочника в табличную часть документа
Maks 10.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru