Files

 master

/

fib.c

Blame

Blame

Latest commit

 

History

History

25 lines (24 loc) · 390 Bytes

 master

/

fib.c

Top

File metadata and controls

• Code
• Blame

25 lines (24 loc) · 390 Bytes

Raw

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

#include "blackdos.h"

void main()

{

int i, a = 1, b = 1, c, n;

PRINTS("How many terms? \0");

SCANN(n);

if (n < 3) n = 3;

PRINTN(n);

PRINTS(" terms: \0");

PRINTN(a);

PRINTS(" \0");

PRINTN(b);

PRINTS(" \0");

for (i = 0; i < n - 2; i++)

{

c = a + b;

PRINTN(c);

PRINTS(" \0");

a = b;

b = c;

}

PRINTS("\r\n\0");

END;

}