3 / 3 / 1
Регистрация: 02.02.2012
Сообщений: 79

Вычислить значение сложной функции при заданном значении аргумента

14.06.2012, 15:40. Показов 1969. Ответов 5
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
дан график, по которому нужно найти у( х задается с клавиатуры)
промежуток между разрывами увеличивается в 2 раза. у равен либо 1, либо -1.

0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
14.06.2012, 15:40
Ответы с готовыми решениями:

Вычислить функцию Y при заданном значении аргумента
1) Определить декларативную часть предложенной программы. Набрать программу на ПК. Составить блок-схему к программе. A=9 D=36-A ...

Вычисление значения выражения при заданном значении аргумента
Дано действительное число х. Вычислить при S=((х-2)(х-4)...(х-64)) / ((х-1)(х-3)...(х-61)). Х=18.75

Вычислить значение функции при заданном значении аргумента
Вычислить y=16x2-1 при заданном x. Если y>=3, то вычислить и напечатать b=x3; если y<3 ,то вычислить и напечатать c=10-x. Если b>0,...

5
3 / 3 / 1
Регистрация: 02.02.2012
Сообщений: 79
26.06.2012, 17:03  [ТС]
написал прогу, но она работает только для целых значений. как сделать чтоб работала и при дробных?
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
var i:integer;k,x:real;
begin
writeln('x=');
readln(x);
i:=0;
while x>=k do
begin
k:=exp(i*ln(2));
i:=i+1;
end;
if i mod 2=0 then writeln('y=1')
else writeln('y:=-1');
end.
Добавлено через 4 часа 57 минут
есть похожая прога, но там увеличение промежутка увеличивается на 1 единицу, а не в 2 раза как нужно. может ее можно переправить как-то?
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
var x,y:real;
x0,x1:integer;
begin
write('x=');
readln(x);
y:=(sqrt(1+8*x)-1)/2;
x0:=trunc(y) mod 2;
x1:=(trunc(y)+1) mod 2;
if ((x0=0) and (x1=1))
then begin
y:=1;
end
else begin
y:=-1;
end;
writeln('y=',y);
end.
Добавлено через 1 час 11 минут
живые есть?
0
NPC
 Аватар для PolarFoG
152 / 146 / 22
Регистрация: 10.01.2012
Сообщений: 390
26.06.2012, 21:09
Цитата Сообщение от nosferato Посмотреть сообщение
написал прогу, но она работает только для целых значений. как сделать чтоб работала и при дробных?
Элементарно...

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
30
program console;
{$mode Objfpc} {$H+}
 
uses
 Crt, FileUtil;
 
var k,k1,x,r:real;
  i:integer;
begin
write('x=');
readln(x);
i:=0;
 
while true do
begin
 
k:=exp(i*ln(2));
inc(i);
 
if x<k then begin
if i mod 2=0 then writeln('y=-1')
else writeln('y:=1');
k1:=k;
 
break;
end;
end;
 
readkey();
end.
Я даже перемудрил : )
0
3 / 3 / 1
Регистрация: 02.02.2012
Сообщений: 79
27.06.2012, 06:33  [ТС]
нет, она совсем не так работает
0
NPC
 Аватар для PolarFoG
152 / 146 / 22
Регистрация: 10.01.2012
Сообщений: 390
27.06.2012, 11:52
Цитата Сообщение от nosferato Посмотреть сообщение
нет, она совсем не так работает
Согласен, но могли и сами доработать. Дел то всего ничего, добавить переменную накопления...

...ну ладно, чёрт с ними с циклами. В данном случае цикл это - не очень изящное решение. Так что...
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
program console;
{$mode Objfpc} {$H+}
 
uses
 Crt, FileUtil, Math;
 
var x:real;
  i:integer;
begin
 
write('x=');
readln(x);
i:=trunc(log2(x+1));
if i mod 2=0 then writeln('y=1')
else writeln('y:=-1');
 
readkey();
end.
0
3 / 3 / 1
Регистрация: 02.02.2012
Сообщений: 79
27.06.2012, 12:50  [ТС]
тоже вариант.
вот моя поправленная( работает как нужно):
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
program asd;
uses crt;
var x,y:real;
    st,n:integer;
begin
 clrscr;
 write('x: ');
 readln(x);
 st:=1;
 n:=0;
 while (x>st-1) do
 begin
      n:=n+1;
      st:=st*2;
 end;
 n:=n-1;
 if (n mod 2 =0)
 then
     y:=1.0
 else
     y:=-1.0;
 writeln('result: ',y);
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
27.06.2012, 12:50
Помогаю со студенческими работами здесь

Рекурсия: вычислить значение функции Х(n) при заданном значении n
Народ помогите пожалуйста вычислить значение функции Х(n) при заданном значении n, используя рекурсию.

Вычислить при заданном значении n значение выражения
Требуется вычислить при заданном значении n. Y=\frac{\sin 10+\sin 11+...+\sin...

Вычислить значение функции при заданном значении аргумента
Написать программы для решения предложенных ниже задач. Пользователь вводит допустимое значение х, программа выдает результат. у=1+x2

Вычислить значение функции при заданном вводом значении аргумента
Помогите пожалуйста решить ряд не сложных, как я думаю, задачек: Развилка: 1. Разработать информационную технологию, позволяющую по...

Вычислить значение суммы при заданном значении аргумента
дан x, посчитать y y=\sum_{n=1}^{10}\left


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

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

Новые блоги и статьи
Непрерывная интеграция для пакета Python
Mr. Docker 22.06.2025
Было 4 часа утра пятницы, когда я выпустил новую версию нашей внутренней библиотеки для обработки данных. Релиз 0. 5. 2 содержал небольшой фикс для обработки дат в ISO формате, что может пойти не так?. . .
Продвинутый ETL на C# из OLTP БД в хранилище
stackOverflow 22.06.2025
Работая в сфере корпоративной аналитики, я постоянно сталкиваюсь с одним и тем же - нужны чистые, структурированные и, главное, свежие данные. Без них современные аналитические системы, машинное. . .
Мастер-класс по микросервисам на Node.js
Reangularity 21.06.2025
Node. js стал одной из самых популярных платформ для микросервисной архитектуры не случайно. Его неблокирующая однопоточная модель и событийно-ориентированный подход делают его идеальным для. . .
Управление Arduino из WPF приложения
Wired 21.06.2025
Зачем вообще связывать Arduino с WPF-приложением? Казалось бы, у Arduino есть собственная среда разработки, своя экосистема, свои способы управления. Однако при создании серьезных проектов. . .
Звёздная пыль
kumehtar 20.06.2025
Я просто это себе представляю: как создавался этот мир. Как энергия слипалась в маленькие частички. Как они собирались в первые звёзды, как во вселенной впервые появился Свет. Как эти звёзды. . .
Создание нейросети с PyTorch
AI_Generated 19.06.2025
Ключевое преимущество PyTorch — его питоновская натура. В отличие от TensorFlow, который изначально был построен как статический вычислительный граф, PyTorch предлагает динамический подход. Это. . .
JWT аутентификация в ASP.NET Core
UnmanagedCoder 18.06.2025
Разрабатывая веб-приложения, я постоянно сталкиваюсь с дилеммой: как обеспечить надежную аутентификацию пользователей без ущерба для производительности и масштабируемости? Классические подходы на. . .
Краткий курс по С#
aaLeXAA 18.06.2025
Здесь вы найдете все необходимые функции чтоб написать програму на C# Задание 1: КЛАСС FORM 1 public partial class Form1 : Form { Spisok listin = new Spisok(); . . .
50 самых полезных примеров кода Python для частых задач
py-thonny 17.06.2025
Эффективность работы разработчика часто измеряется не количеством написаных строк, а скоростью решения задач. Готовые сниппеты значительно ускоряют разработку, помогают избежать типичных ошибок и. . .
C# и продвинутые приемы работы с БД
stackOverflow 17.06.2025
Каждый . NET разработчик рано или поздно сталкивается с ситуацией, когда привычные методы работы с базами данных превращаются в источник бессонных ночей. Я сам неоднократно попадал в такие ситуации,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru