составить чисел Люка задается рекуррентным соотношением:F(1) = 2F(2) = 1F(n) = F(n–2) + F(n–1), при n >2, где n – натуральное число.Чему равно восьмое число в последовательности Люка?В ответе запишите только натуральное число.
Если дальше завершить программу, то получим это: program HelloWorld; function ez(a: longint): boolean; var c: integer; begin ez := a >= 2; for c := 2 to trunc(sqrt(a)) do if a mod c = 0 then ez := false end; var i, k: integer; num: array [1 .. 100] of integer; begin for i := 0 to 99 do num[i+1] := i + 1; k := 0; i := 1; while k < 7 do begin if ez(num[i]) = true then k := k + 1; i := i + 2; end; write(num[i-2]); end. ответ 19
for (i = 0; i < kol; i++) {
cout « as[i].punkt_naznachenia « " ";
cout « as[i].nomer_reisa « " ";
cout « as[i].tip_samoleta « endl;
}
char poisk_samoletov[40];
cout « "Punkt naznachenia reisa " « endl;
cin » poisk_samoletov;
bool f = false;
for (i = 0; i < kol; i++)
if (strcmp(as[i].punkt_naznachenia, poisk_samoletov) == 0)
{
cout « "Nomer reisa ";
cout « as[i].nomer_reisa « endl;
cout « "Tip samoleta ";
cout « as[i].tip_samoleta « endl;
f = true;
}
if (!f) {
cout « "Net takogo punkta naznachenia reisa " « endl;
}
system("pause");
}
Объяснение:
program HelloWorld;
function ez(a: longint): boolean; var c: integer; begin ez := a >= 2; for c := 2 to trunc(sqrt(a)) do if a mod c = 0 then ez := false end; var i, k: integer; num: array [1 .. 100] of integer;
begin for i := 0 to 99 do num[i+1] := i + 1; k := 0; i := 1; while k < 7 do begin if ez(num[i]) = true then k := k + 1; i := i + 2; end; write(num[i-2]); end.
ответ 19