17 lines
103 B
Text
17 lines
103 B
Text
|
read(max);
|
||
|
|
a:=0;
|
||
|
|
b:=1;
|
||
|
|
while(a<max){
|
||
|
|
print(a);
|
||
|
|
c :=a;
|
||
|
|
a := a+b;
|
||
|
|
b:=c
|
||
|
|
};
|
||
|
|
print(a)
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|