найти n=ый элемент и сумму ряда Фибоначчи? задача на тему цикл с известным числом повторения
5-9 класс
|
это если без массива
var n,i:integer;
a0,a1,a2,s:real;
Begin
read(n);
for i:= 1 to n do begin
if i<3 then a0:=1
else a0:=a1+a2;
s:=s+a0;
a2:=a1;
a1:=a0;
end;
writeln(a0, s);
End.
Другие вопросы из категории
письма кодирыване сообщений написание контрольной работы выставление семестровой оценки ведения дневника фотографирывание ведение записей на уроке показ пантомимы отправка письма
Информационный объём статьи до редактирования был равен 1 Мбайт. Статья представлена в кодировке Unicode, в которой каждый символ кодируется 2 байтами. Определите информационный объём статьи в Кбайтах в это варианте представления Unicode после редактирования.
Читайте также
Выходные данные :вывести сумму ряда.
амеба каждые 3 часа делиться на 2 клетки. Определить, сколько амеб будет через 3,6,9,12 и 24 часа.
3) дано натуральное числоо N и действительное число Х. Вычислить сумму ряда sin(x)+sin(2x)+sin(3x)+...+sin(Nx).
4) написать программу для вычисления n-ой степени числа А.
помогите, пожалуйста)
Решить задачи на турбопаскале:
1.Дано натуральное число Найти сумму и произведение первых двух чисел.
2.Дано n-значное натуральное число. Правда ли что квадрат произведения цифр числа равняется кубу суммы цифр числа.
3.Составить программу, которая печатает таблицу умножения и сложения натуральных чисел в десятичной системе счисления.
сумму двух других,иначе треугольник не существует. Задача на тему "Программирование ветвлений на Паскале".
среднее арифметическое всех элементов массива; d) Найти произведение всех элементов массива.