Напишите программу для ABC Pascal для вывода n числа Фибоначчи, где n <=40. Массив не использовать
Ответы
Ответ дал:
0
var a,b,c,i,n: integer;
begin
write('n = ');
readln(n);
a := 0;
write(a,' '); b := 1; write(b,' ');
for i:=3 to n do begin
write(a+b,' ');
c := b;
b := a + b;
a := c
end;end.
begin
write('n = ');
readln(n);
a := 0;
write(a,' '); b := 1; write(b,' ');
for i:=3 to n do begin
write(a+b,' ');
c := b;
b := a + b;
a := c
end;end.
Ответ дал:
0
А как вывести только последнее число и обозначить, что n<=40?
Ответ дал:
0
все write закоментировать
Ответ дал:
0
end;
writeln(b);
end.
writeln(b);
end.
Ответ дал:
0
добавить
Ответ дал:
0
Спасибо
Вас заинтересует
2 года назад
7 лет назад
9 лет назад
9 лет назад
10 лет назад