QBasic - 6. 1-5 Arasındaki Sayıların Toplamı

QBasic - 6. 1-5 Arasındaki Sayıların Toplamı

10 CLS

20 sayi=1

30 PRINT sayi

40 sayi=sayi+1

50 IF sayi<=5 THEN GOTO 30

60 END