Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ Программирование разветвляющегося вычислительного процесса и Программирование циклического процесса

Автор: alfa64 22.09.2007 0:36

Помогите пожалуйста решить задачи)))

1.Задана периодическая функция f(x), период которой равен 2. На отрезке[-1;1] функция f(x) совпадает с функцией sqr(x)+1. Вычислить значение f(x) в точке x0.


2.Рассмотреть решение предложенной задачи с использованием всех трех видов циклов. Отладить программу с наиболее рациональным вариантом цикла. Обосновать выбор.
Найти сумму первых k чисел последовательности Фибоначи. Последовательность определяется законом: F0=F1=1; Fn=Fn-1+Fn-2 для n>= 2.

smile.gif Заранее благодарен.))))

Автор: мисс_граффити 22.09.2007 1:43

По второй поищи - было на форуме что-то похожее.

По первой:

Код
пока х0<-1
  х0:=x0+2;
пока х0>1
  x0:=x0-2;
результат:=sqr(x0)+1

за счет симметричности отрезка можно обойтись одним циклом и смотреть по модулю.
то есть цикл "пока модуль(х0)>1", а внутри него - условие, определяющее, прибавлять 2 или отнимать.
или это задание чисто на ветвление, циклами пользоваться нельзя?

Автор: alfa64 22.09.2007 1:46

первая задача чисто на ветвление,циклами нельзя пользоваться.Спасибо за помощь.)))

Автор: мисс_граффити 22.09.2007 2:26

допустим, у нас число вида X.Y
Период функции равен 2, то есть f(X.Y)=f((X-2).Y)
Соответственно, если Х - четное, f(X.Y)=f(0.Y)
Если Х - нечетное, то получаем f(X.Y)=f(0.Y-1)
Функция четная, f(X)=f(-X)
Поэтому получается что-то типа такого:

if odd(trunc(x0)) then
x0:=abs(frac(x0))-1
else
x0:=abs(frac(x0));
fx:=sqr(x0)+1;

Набирала прямо здесь, не тестировала.

Автор: alfa64 22.09.2007 20:41

Большое спасибо за помощь smile.gif Но у меня че то не хочет набиратся вот эта строчка fx:=sqr(x0)+1 а точнее fx у меня не задается че то )

Автор: Артемий 22.09.2007 20:53

Цитата
а точнее fx у меня не задается че то )

fx и x0 должны быть real..

Добавлено через 1 мин.
если конечно я правильно понял проблему..

Автор: alfa64 22.09.2007 23:31

smile.gif fx и x0 должны быть real..

Я так и ввожу токо fx подчеркивается красным цветом как ошибка.)))Че то я ее не догоняю как задать правильно))).

Автор: volvo 22.09.2007 23:35

Цитата
не догоняю как задать правильно
Показать полный исходник, а не надеяться на присутствие телепатов на форуме...

Автор: alfa64 23.09.2007 0:33

Все спасибо за помощь все сделал.))) smile.gif просто прога подглючила поэтому задать fx не мог))). rolleyes.gif