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