26.2.. Aritmeticke operacije - dva broja. Napisati program koji generiš dva broja od 1 do 9. Ispisuje generisane brojeve na ekran i očekuje da korisnik učita sumu sa tastature. Po učitavanju Ispisuje da li je odgovor tačan. Postupak se ponavlja 10 puta.
Opis rješenja: Generisanje prirodnih brojeva se izvodi INT(RND * 9 + 1)
Listing programa:
REM 26011020
CLS
PRINT "PROVJERA ODUZIMANJA 1-9"
PRINT "TUTORIJAL"
PRINT "Na ekranu se pojavljuju dva broja, ucitaj njihovu razliku"
PRINT "Racunar provjerava tacnost njihove razlike "
RANDOMIZE TIMER: REM Omogucuje nove brojeve pri svakom startanju programu
tacno = 0
FOR i = 1 TO 11
x = INT(RND * 9 + 1): REM prirodan broj 1-9
y = INT(RND * 9 + 1): REM prirodan broj 1-9
PRINT x; "-"; y; " = ";
INPUT c
IF x - y = c THEN
tacno = tacno + 1
PRINT "Tacno! Imas "; tacno; " bodova"
ELSE
PRINT "Zao mi je, tacan odgovor je"; x + y
END IF
NEXT i
PRINT "od 10 mogucih, osvojili ste", tacno, "bodova"
END
Ispis na ekranu:
Index
|