Помогите написать программу на паскале.Пусть Y(0)=1;Y(i)=(16-Y(i-1))/17,i=1,2,3...Найти Y(17).
10-11 класс
|
не совсем уверен что правильно:
var y:array [0..18] of real;
i :integer;
begin
for i := 1 to 17 do
begin
y[0]:=1;
y[i]:=(16 - y[i-1])/17;
end;
write(y[i]);
end.
я так понимаю нужно найти сумму У? (y(i) + y(i = 2)) + ...) или просто подставить вместо i - 17?
Думаю,надо найти Y 17,а не сумму. Т.е. надо сделать так,чтобы прога считала Y от 1 до 17,а затем вывела Y от 17
Другие вопросы из категории
1) конкретный номер host-компьютера в сети нижнего уровня иерархии
2) сеть, на нижнем уровне которой находится адресуемый компьютер
Пример оформления решения:
Число Кубы
1 1
3 27
5 1257 3439 729
Задание 1. на рисунке 1 (ромб) представлена фигура, используемая для построения блок схем алгоритма. Что записывается внутри фигуры-символа?
Задание 2. Внимательно просмотрите псевдокод. Определите, что выполняет данный фрагмент алгоритма:
ЕСЛИ Х ЕСЛИ Х ИНАЧЕ M := Z
ВСЕ
ИНАЧЕ
ЕСЛИ Y < Z TO M := Y
ИНАЧЕ М := Z
ВСЕ
ВСЕ
Задание 3. Дан одномерный массив С(5). Составьте блок-схему алгоритма вычисления произведения для положительных элементов массива С.
Какое максимальное число можно записать в двух байтах в формате с фиксированной запятой?
Что означает ноль в знаке?
Чем отличается система кодирования ASCII от UNICODE?
Читайте также
добрый вечер, всем. помогите, пожалуйста, написать программу на Ассемблере.
задание:
Создать программу на языке Ассемблер, что позволяет организовать вычисления над элементами массивов
Объединить два массива 8-битных целых чисел со знаком. Сначала элементы второго затем первого.
заранее огромное спасибо всем!
рдинат. Я поняла, что нужно найти их длины (формулы я знаю), а правильно написать программу не могу
13.
Нужно написать программу на цикле с предусловием, на Паскале.
2.написать программу в паскале
f(x)=2(sin*sin)x+1
Дано натуральное число n. Написать программу вычисляющую сумму