Уважаемые профессионалы, подскажите пожалуйста, как решить следующие задачи с помощью байсика -

1)Вырабатывается последовательность "n" случайных чисел (где n -вводимое натуральное число), равномерно распределенных на промежутке. Необходимо найти числа, которые больше своих непосредственных соседей слева и справа -  назовем их max. Не используя массивы вывести на экран все члены последовательности чисел, выделяя цветом числа - max. осчитать количество max.

Используя print, так как мне надо перевести коды visual basic в basic

2)определить значение функции с известным x - оно есть, но это сейчас не имеет значения.

y= E[((-1)^(n-1))*((sin(x)^(2*n+1))/(n*(n^2+1))]

где Е - сумма последовательных, натуральных n - от 1 до бесконечности...

Заранее благодарен!!! 

Ну...

по задаче 1.

Я думаю, что для первого члена последовательности не имеет смысла определять является ли он макс или нет, так как у него "некомплект" соседей...
А потом нужно определить очередь из трёх переменных а1, а2, а3.
И каждый раз при вводе нового члена последовательности делать сдвиг всей очереди влево (или вправо... Это кто откуда смотрит...).
При этом можно (и нужно) определять является ли а2 макс или нет. Если является, то увеличивать счётчик макс на один и выводить а2 на печать другим цветом...
Замечание!
Печать на экран выдавать с некоторым отставанием от реального ввода элементов (на один член).
Иначе трудно будет управлять цветом при печати из обычного бейсика.

по задаче 2.

Ты сначала проанализируй функцию. Может быть её можно упростить...
Затем уточни точность вычислений. (Прикольная тафтология :-) )
Потом делаешь так.
Вычисляешь F(n) и смотришь чему равна разница  F(n)-F(n-1).
Если разнича мала (меньше, чем точность вычислений), то плюёшь на всё и завершаешь считать.
То, что получилось и будет суммой последовательности.

ПонЯл?

  

Это сообщение отредактировал(а) mihanik - 1.7.2006, 08:53