По паскаль.. я пропустила эту составьте программу поиска первого числа фибоначчи, большего m(m< 1).запустите программу на выполнение..
lilichka0109
3
17.05.2019 09:50
2
Другие вопросы по теме Информатика
МандаринкА487
12.11.2020 14:54
FzdAngels
16.07.2019 00:10
Вкорма
16.07.2019 00:10
АннаШпак
12.05.2020 16:49
Катерина26121
12.05.2020 16:48
гуудик
12.05.2020 16:48
пистолетМакарова
12.05.2020 16:48
v0632039813
11.06.2019 04:40
Чикама
11.06.2019 04:40
Популярные вопросы
- Еще снег не везде сошел,а уже распускаются эти цветочки.кругленькие,как...
2 - Сөз тіркестерін толықтырып, сөйлем құрастырыңыз. міндетті құқықтық...
2 - Үш таң сан мен екі таң санның қосындысына 875 ке тең .үш таң...
2 - Решить уравнение икс в скобках минус 8 равно -5...
2 - Частное разности чисел 100011и99996 и числа 3.найди его значение...
1 - Какое наибольшее значение может принимать отношение наименьшего...
3 - Решите уравнение: 2x−7 четвертых=x−6 третьих...
3 - Найти слова с безударной проверяемой гласной не надо хвалиться...
2 - Явления неживой природы; явления живой природы...
2 - Найдите сумму средних членов пропорции: 7: 5=14: 10 1) 12 2)...
1
program noname;
uses crt;
var
f,f1,f2,m:longint;
begin
clrscr;
write('m=');
readln(m);
f1:=1;
f2:=1;
while f<=m do begin
f:=f1+f2;
f2:=f1;
f1:=f;
end;
writeln('f=',f);
end.