Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 977 ответов!

Составить программу в Turbo Pascal 7, расчитывающую сумму элементов ряда Фибоначчи, попадающих в промежуток [a1;a2], введенных с клавиатуры

5-9 класс

Akpak 04 сент. 2013 г., 7:17:49 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Psish
04 сент. 2013 г., 8:57:46 (10 лет назад)

Program n1;
Uses CRT;
Const n=7;
Var a,b,m,f,g,s: integer;
begin
Writeln('Vvedite znachenia granizy promezhitka');
Readln(a,b);
f:=1;
g:=1;
While f<=b do
begin
If (f>=a)and(f<=b) then s:=s+f;
m:=g;
g:=f;
f:=m+f;
end;
writeln('Summa ravna ',s);
readln
end.

Ответить

Другие вопросы из категории

Запишите по 2 суждения:

а) из истории:
б) из географии:
в) из биологии:
г) из математики:
д) из русского языка:
е) из литературы:
ж)из информатики:
Заранее спасибо!)

1)Раздел в диалоговом окне?(7 букв)2)Область экрана,в которой происходит работа с конкретной программой?(4 буквы)3)Пункт главного меню,с помощью которого

пользователь получает доступ к программам,установленным на его компьютере?(9 букв)

Читайте также

1) составить программу , которая вычисляет суммы элементов столбцов двумерного массива и записывает их в одномерный

2-ая Составить программу , которая в двумерном массиве случайных чисел элементы всех четных строк делает нулевыми
язык паскаль

1) Составьте программу вычисления в массиве A(N) суммы всех чисел, кратных 3. 2) Составьте программу вычисления в массиве B(8) суммы отрицательных

элементов. 3) Составьте программу вычисления среднего арифметического элементов массива. Пожалуйста.. очень надо!

Составить программы в Turbo Pascal. 1)Дано три точки A,B,C на числовой оси.Найти длинну отрезка AC и BC и их сумму. 2)Задано четыре целых числа

a,b,c,d.Выяснить произведение этих чисел больше 300? 3)Дано целое число ,если оно положительное,то прибавить к нему 1,а если отрицательное.то отнять от него 2.Вывести полученое число.

Очень срочно, и очень нужно составить программы по информатике PASCAL ABC, помогите, пожалуйста от этих программ зависит моя четвертная.

1. Составьте программу для определения большего из двух чисел х или у
2. Составьте программу для нахождения площади прямоугольника по заданным сторонам а и б



Вы находитесь на странице вопроса "Составить программу в Turbo Pascal 7, расчитывающую сумму элементов ряда Фибоначчи, попадающих в промежуток [a1;a2], введенных с клавиатуры", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.