Вычисление значения функции

@Zolushka · Регистрация: 05.10.2010

Студворк — интернет-сервис помощи студентам

Здравствуйте! Помогите составить программу вычисления значения функции, где х1:=10, хn:=150, шаг изменения аргумента функции равен а)1; б)2
Помогите, пожалуйста, знаю, что легкое задание, но никак не могу сообразить, как это записывается на Паскале.

@SuPeR XaKer · 19.10.2010, 00:53

https://www.cyberforum.ru/pascal/thread178228.html

@denisneposeda · 19.10.2010, 01:22

Сообщение от Zolushka

Здравствуйте! Помогите составить программу вычисления значения функции, где х1:=10, хn:=150, шаг изменения аргумента функции равен а)1; б)2
Помогите, пожалуйста, знаю, что легкое задание, но никак не могу сообразить, как это записывается на Паскале.

ага, все через табулирование...но если хочешь, что бы тебе решили, ты хотя бы формулу дал...

@Zolushka · 19.10.2010, 01:30 **[ТС]**

Я думаю, каждое хi будет считаться так: хi=x(i-1)+1, где 1 - шаг изменения аргумента

@denisneposeda · 19.10.2010, 01:48

Сообщение от Zolushka

Я думаю, каждое хi будет считаться так: хi=x(i-1)+1, где 1 - шаг изменения аргумента

должна быть функция...переменная которая должна находится перебором x...примером, любое: y=x^2 )))) или функции нет?

@Zolushka · 19.10.2010, 01:57 **[ТС]**

В задании о функции у не говорилось, написано "составить программу вычисления значения функции. х1=10;" и т.д.

@denisneposeda · 19.10.2010, 02:20

Сообщение от Zolushka

В задании о функции у не говорилось, написано "составить программу вычисления значения функции. х1=10;" и т.д.

x1------>это начальный значение X, с которого начнется перебор;
xn------>это конечное значение X, на котором закончится перебор;

А для чего нам перебирать? Что оно будет считать, так и не известно...или я туплю, или что...

Табуляцию при шаге 1 выполняется при помощи цикла:

Pascal
1
2
for x1:=x1 to xn do
{место для функции}

Табуляцию при шаге 2 выполняется при помощи цикла:

Pascal
1
2
3
while x1<=xn do
{место для фунции}
x1:=x1+2;

@Zolushka · 19.10.2010, 02:24 **[ТС]**

Спасибо огромное! я с утра обязательно попробую что-нибудь сконструировать в Паскале) Спасибо еще раз за помощь, завтра напишу, что получилось

@denisneposeda · 19.10.2010, 02:27

Сообщение от Zolushka

Спасибо огромное! я с утра обязательно попробую что-нибудь сконструировать в Паскале) Спасибо еще раз за помощь, завтра напишу, что получилось

ага отпишись, а то мне самому интересно, что ты сделаешь )) из чего ты все лепить будешь )))

@Zolushka · 19.10.2010, 22:16 **[ТС]**

У меня ничего не получается((( я попробовала за функцию взять вычисление н-ого члена арифметической прогрессии, но у меня ничего не выводится на экран, кроме того, что х1=10( вот что писала в паскале:

Program Funkcia;
uses CRT;
var
x1,xn,y,n:integer;
begin
x1:=10;
xn:=150;
write('x1=', x1);
readln(x1);

while x1<=xn do
y:=x1+(n-1)*2;
x1:=x1+2;
readln;

end.

@denisneposeda · 19.10.2010, 22:20

Zolushka, конечно же бред ))) а что ты хотела увидеть ))) у тебя цикл не будет считать, т.к. есть (n-1), а у тебя нету и строчки что бы хоть его обозначало...не считая описания переменных. Конечно у тебя будет выводить только X1, т.к. стоит присваивание X1=10 и сразу его вывод...больше выводов нет ))...вот в общем описал...что я и говорил, нужна функция, которую нужно считать ))) ну и на последок...у тебя не известно конечное значение ))

@Zolushka · 19.10.2010, 22:28 **[ТС]**

А как можно обозначить, что n - это номер элемента х? и можно ли применить эту функцию: у=х1+(n-1)*2, где у будет являться xn и вычисляться, пока не станет равным 150?

@denisneposeda · 19.10.2010, 22:40

Сообщение от Zolushka

А как можно обозначить, что n - это номер элемента х? и можно ли применить эту функцию: у=х1+(n-1)*2, где у будет являться xn и вычисляться, пока не станет равным 150?

мдамс...я не могу понять. что тебе нужно сделать...что это за функция? ужас...я в тумане ((( точно такоей условие...почитай условие, или сфоткай ))) что-то не дописано, или ты не дописала

@Zolushka · 19.10.2010, 22:53 **[ТС]**

это преподаватель написал задание, не хочет экзамен ставить((

@Zolushka · 19.10.2010, 22:56 **[ТС]**

Вообще получается, что это арифметическая прогрессия, т.е. каждый новый член прогрессии увеличивается на одно и то же число, только не умею я это в паскале писать, вот на листе бумаги и формулами, так это пожалуйста, а здесь проблема(((

@denisneposeda · 19.10.2010, 23:06

Zolushka, мдамс....беспонятия...а чему равен как там дискриминант...или как там? ...=x2-x1 )) вот...а так если прогрессия, то это просто вывести её?

@Spectral-Owl · 19.10.2010, 23:08

Итак, пишу для ABC паскаля:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Program Nya;
uses CRT;
var i,xx:integer;
begin
clrscr;
xx:=10;
i:=1;
while xx<150 do
begin
xx=xx+(i-1)*2;
writeln ('x',i,'=',xx);
i:=i+1;
end;
end.

попробуй это, если я не перепутал знак в операторе while и не сделал синтаксических ошибок должно работать)

@denisneposeda · 19.10.2010, 23:13

Spectral-Owl, хех...если это правильно, то я удивлюсь...ничего сложного ))) но я так не понял, в чем суть ))

@Zolushka · 19.10.2010, 23:21 **[ТС]**

Сообщение от Spectral-Owl

Итак, пишу для ABC паскаля:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Program Nya;
uses CRT;
var i,xx:integer;
begin
clrscr;
xx:=10;
i:=1;
while xx<150 do
begin
xx=xx+(i-1)*2;
writeln ('x',i,'=',xx);
i:=i+1;
end;
end.

попробуй это, если я не перепутал знак в операторе while и не сделал синтаксических ошибок должно работать)

Спасибо большое! только у меня не запускается эта программа почему-то((

@denisneposeda · 19.10.2010, 23:22

Zolushka, ооо знач правильно...здесь подправь, знака присваивания нет:

Pascal
1
xx:=xx+(i-1)*2;

Новые блоги и статьи Все статьи Все блоги /
делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью	SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .

@Zolushka 0 / 0 / 0 Регистрация: 05.10.2010 Сообщений: 14

	Вычисление значения функции 19.10.2010, 00:47. Показов 3177. Ответов 25 Метки нет (Все метки) Здравствуйте! Помогите составить программу вычисления значения функции, где х1:=10, хn:=150, шаг изменения аргумента функции равен а)1; б)2 Помогите, пожалуйста, знаю, что легкое задание, но никак не могу сообразить, как это записывается на Паскале. 0

@SuPeR XaKer 2857 / 1986 / 788 Регистрация: 23.09.2010 Сообщений: 4,876
	19.10.2010, 00:53
	https://www.cyberforum.ru/pascal/thread178228.html 1

@Zolushka 0 / 0 / 0 Регистрация: 05.10.2010 Сообщений: 14
	19.10.2010, 01:30 [ТС]
	Я думаю, каждое хi будет считаться так: хi=x(i-1)+1, где 1 - шаг изменения аргумента 0

@Zolushka 0 / 0 / 0 Регистрация: 05.10.2010 Сообщений: 14
	19.10.2010, 01:57 [ТС]
	В задании о функции у не говорилось, написано "составить программу вычисления значения функции. х1=10;" и т.д. 0

@Zolushka 0 / 0 / 0 Регистрация: 05.10.2010 Сообщений: 14
	19.10.2010, 02:24 [ТС]
	Спасибо огромное! я с утра обязательно попробую что-нибудь сконструировать в Паскале) Спасибо еще раз за помощь, завтра напишу, что получилось 0

@Zolushka 0 / 0 / 0 Регистрация: 05.10.2010 Сообщений: 14
	19.10.2010, 22:16 [ТС]
	У меня ничего не получается((( я попробовала за функцию взять вычисление н-ого члена арифметической прогрессии, но у меня ничего не выводится на экран, кроме того, что х1=10( вот что писала в паскале: Program Funkcia; uses CRT; var x1,xn,y,n:integer; begin x1:=10; xn:=150; write('x1=', x1); readln(x1); while x1<=xn do y:=x1+(n-1)*2; x1:=x1+2; readln; end. 0

@denisneposeda 46 / 46 / 36 Регистрация: 18.10.2010 Сообщений: 212
	19.10.2010, 22:20
	Zolushka, конечно же бред ))) а что ты хотела увидеть ))) у тебя цикл не будет считать, т.к. есть (n-1), а у тебя нету и строчки что бы хоть его обозначало...не считая описания переменных. Конечно у тебя будет выводить только X1, т.к. стоит присваивание X1=10 и сразу его вывод...больше выводов нет ))...вот в общем описал...что я и говорил, нужна функция, которую нужно считать ))) ну и на последок...у тебя не известно конечное значение )) 0

@Zolushka 0 / 0 / 0 Регистрация: 05.10.2010 Сообщений: 14
	19.10.2010, 22:28 [ТС]
	А как можно обозначить, что n - это номер элемента х? и можно ли применить эту функцию: у=х1+(n-1)*2, где у будет являться xn и вычисляться, пока не станет равным 150? 0

@Zolushka 0 / 0 / 0 Регистрация: 05.10.2010 Сообщений: 14
	19.10.2010, 22:53 [ТС]
	это преподаватель написал задание, не хочет экзамен ставить(( Миниатюры 0

@Zolushka 0 / 0 / 0 Регистрация: 05.10.2010 Сообщений: 14
	19.10.2010, 22:56 [ТС]
	Вообще получается, что это арифметическая прогрессия, т.е. каждый новый член прогрессии увеличивается на одно и то же число, только не умею я это в паскале писать, вот на листе бумаги и формулами, так это пожалуйста, а здесь проблема((( 0

@denisneposeda 46 / 46 / 36 Регистрация: 18.10.2010 Сообщений: 212
	19.10.2010, 23:06
	Zolushka, мдамс....беспонятия...а чему равен как там дискриминант...или как там? ...=x2-x1 )) вот...а так если прогрессия, то это просто вывести её? 0

@denisneposeda 46 / 46 / 36 Регистрация: 18.10.2010 Сообщений: 212
	19.10.2010, 23:13
	Spectral-Owl, хех...если это правильно, то я удивлюсь...ничего сложного ))) но я так не понял, в чем суть )) 0