Задачи на while

@HERON · Регистрация: 17.05.2009

Студворк — интернет-сервис помощи студентам

Помогите решить задачи с помощу while.Бужу очень благодарен.

1)Данно целое число n(>0).Найти наименьшее целое положительное число K,квадрат которго превосходит n:sqr(k)>0.Функциюизвлечения квадратного корня не использовать.
2)Данно целое число n(>1).Последовательность чисел Фибоначчи Fк опредиляется
следующим образом:
F1 =1 F2=1, Fk= Fk-2 + Fk-1, K= 3,4, ... .
Проверить, является ли число N числом Фибоначчи. Если является, то вывести Тгuе, если нет — вывести False.

@mamedovvms · 19.05.2009, 13:59

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
uses crt;
var i,n:integer;
begin
 clrscr;
 writeln('n');
 readln(n);
i:=0;
while sqr(i)<=n do
 i:=i+1;
writeln(i);
readln;
end.

@HERON · 19.05.2009, 14:10 **[ТС]**

mamedovvms,
спс

@mamedovvms · 19.05.2009, 14:12

да незачто , жми кнопку и мы в расчете

Добавлено через 33 секунды
))))))))))))

@HERON · 19.05.2009, 14:18 **[ТС]**

mamedovvms, А насчет второй есть какие нибудь соображения).

@mamedovvms · 19.05.2009, 14:21

нет , просто я не понимаю даже условие, извини , когда могу всегда помогу

@HERON · 19.05.2009, 14:24 **[ТС]**

mamedovvms
А что именно не понятно сама задача или ,после *опредиляется
следующим образом:*

@mamedovvms · 19.05.2009, 14:28

я просто не понимаю формулу которая там написана

@HERON · 19.05.2009, 14:36 **[ТС]**

mamedovvms,
F1=1 F2=1(так само )
(внизу f маленькая 1, типа Fпервое=1 )
и там где Fk= Fk-2 + Fk-1
F(k)=F(k-2)+F(k-1)
(k),(k-2),(k-1)- так само как и 1и2 в F1=1 F2=1

@mamedovvms · 19.05.2009, 14:38

да это то я понял , я вот что не понял почему F1=1 и F2=1 как так получается что они равны оба единице

@HERON · 19.05.2009, 14:40 **[ТС]**

mamedovvms,
А это хз(.

@mamedovvms · 19.05.2009, 14:43

ты сам если понимаешь, напиши мне просто примерчик, а я если пойму напишу прогу

@HERON · 19.05.2009, 14:48 **[ТС]**

Я завтра в преподавателя спрошу ,а то просто задания роздают без обяснений ток говорят через что их делать.

@mamedovvms · 19.05.2009, 14:50

ладно не вопрос, завтра если что и решим

@HERON · 19.05.2009, 14:51 **[ТС]**

ок)

@HERON · 20.05.2009, 15:05 **[ТС]**

mamedovvms
Короче он сказал что это F1 =1 F2=1, Fk= Fk-2 + Fk-1, K= 3,4, ... .можно записать как F(1)=1,F(2)=1,F(3)=2,F(4)=3,F(5)=5,F(6)= 8,F(7)=13... .
Ну типа что б получить F(4)=3 нада додать F(2)=1+F(3)=2 и так далее.
И нужно зделать так что б когда вводим любое число програма проверяла есть ли введенное число F(1)=1,F(2)=1,F(3)=2,F(4)=3,F(5)=5,F(6)= 8,F(7)=13... .тут или нет.

@c00le® · 20.05.2009, 15:29

думаю, что надо как-то вот так:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
       Uses Crt;
   
       const
       fibo=[0,1,1,2,3,5,8,13,21,34,55,89,144,233];
 
       var x:integer;
           t:boolean;
       Function fib (n : integer):integer;
 
       begin
         if n <= 2
           then
             fib := 1
           else
             fib := fib (n - 2) + fib (n - 1);
       end;
 
       Begin
         ClrScr;
         Writeln('vvedite N = ');
         Readln(x);
         if fib(x) in fibo then t:=true
         else t:=false;
         writeln(t);
         ReadLn;
       End.

@HERON · 20.05.2009, 15:35 **[ТС]**

c00le®,
спс ну нада через while его делать

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11680&d=1772460536 Одним из. . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .
SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .	SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .	Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .

@HERON 1 / 1 / 0 Регистрация: 17.05.2009 Сообщений: 104

	Задачи на while 19.05.2009, 13:53. Показов 3531. Ответов 17 Метки нет (Все метки) Помогите решить задачи с помощу while.Бужу очень благодарен. 1)Данно целое число n(>0).Найти наименьшее целое положительное число K,квадрат которго превосходит n:sqr(k)>0.Функциюизвлечения квадратного корня не использовать. 2)Данно целое число n(>1).Последовательность чисел Фибоначчи Fк опредиляется следующим образом: F1 =1 F2=1, Fk= Fk-2 + Fk-1, K= 3,4, ... . Проверить, является ли число N числом Фибоначчи. Если является, то вывести Тгuе, если нет — вывести False. 0

@HERON 1 / 1 / 0 Регистрация: 17.05.2009 Сообщений: 104
	19.05.2009, 14:10 [ТС]
	mamedovvms, спс 0

@mamedovvms 2923 / 844 / 324 Регистрация: 30.04.2009 Сообщений: 2,633
	19.05.2009, 14:12
	да незачто , жми кнопку и мы в расчете Добавлено через 33 секунды )))))))))))) 0

@HERON 1 / 1 / 0 Регистрация: 17.05.2009 Сообщений: 104
	19.05.2009, 14:18 [ТС]
	mamedovvms, А насчет второй есть какие нибудь соображения). 0

@mamedovvms 2923 / 844 / 324 Регистрация: 30.04.2009 Сообщений: 2,633
	19.05.2009, 14:21
	нет , просто я не понимаю даже условие, извини , когда могу всегда помогу 0

@HERON 1 / 1 / 0 Регистрация: 17.05.2009 Сообщений: 104
	19.05.2009, 14:24 [ТС]
	mamedovvms А что именно не понятно сама задача или ,после опредиляется следующим образом: 0

@mamedovvms 2923 / 844 / 324 Регистрация: 30.04.2009 Сообщений: 2,633
	19.05.2009, 14:28
	я просто не понимаю формулу которая там написана 0

@HERON 1 / 1 / 0 Регистрация: 17.05.2009 Сообщений: 104
	19.05.2009, 14:36 [ТС]
	mamedovvms, F1=1 F2=1(так само ) (внизу f маленькая 1, типа Fпервое=1 ) и там где Fk= Fk-2 + Fk-1 F(k)=F(k-2)+F(k-1) (k),(k-2),(k-1)- так само как и 1и2 в F1=1 F2=1 0

@mamedovvms 2923 / 844 / 324 Регистрация: 30.04.2009 Сообщений: 2,633
	19.05.2009, 14:38
	да это то я понял , я вот что не понял почему F1=1 и F2=1 как так получается что они равны оба единице 0

@HERON 1 / 1 / 0 Регистрация: 17.05.2009 Сообщений: 104
	19.05.2009, 14:40 [ТС]
	mamedovvms, А это хз(. 0

@mamedovvms 2923 / 844 / 324 Регистрация: 30.04.2009 Сообщений: 2,633
	19.05.2009, 14:43
	ты сам если понимаешь, напиши мне просто примерчик, а я если пойму напишу прогу 0

@HERON 1 / 1 / 0 Регистрация: 17.05.2009 Сообщений: 104
	19.05.2009, 14:48 [ТС]
	Я завтра в преподавателя спрошу ,а то просто задания роздают без обяснений ток говорят через что их делать. 0

@mamedovvms 2923 / 844 / 324 Регистрация: 30.04.2009 Сообщений: 2,633
	19.05.2009, 14:50
	ладно не вопрос, завтра если что и решим 0

@HERON 1 / 1 / 0 Регистрация: 17.05.2009 Сообщений: 104
	19.05.2009, 14:51 [ТС]
	ок) 0

@HERON 1 / 1 / 0 Регистрация: 17.05.2009 Сообщений: 104
	20.05.2009, 15:05 [ТС]
	mamedovvms Короче он сказал что это F1 =1 F2=1, Fk= Fk-2 + Fk-1, K= 3,4, ... .можно записать как F(1)=1,F(2)=1,F(3)=2,F(4)=3,F(5)=5,F(6)= 8,F(7)=13... . Ну типа что б получить F(4)=3 нада додать F(2)=1+F(3)=2 и так далее. И нужно зделать так что б когда вводим любое число програма проверяла есть ли введенное число F(1)=1,F(2)=1,F(3)=2,F(4)=3,F(5)=5,F(6)= 8,F(7)=13... .тут или нет. 0

@HERON 1 / 1 / 0 Регистрация: 17.05.2009 Сообщений: 104
	20.05.2009, 15:35 [ТС]
	c00le®, спс ну нада через while его делать 0