23.1.23010070. Učitati 3 različita realna broja. Ispisati ih u rastućem redoslijedu na ekran.
Opis rješenja:
Listing programa:
REM 23010070 Učitati 3 različita realna broja. Ispisati ih u rastućem redoslijedu na ekran.
PRINT "Unesi tri broja "
INPUT a
INPUT b
INPUT c
PRINT "Ulazni redoslijed: "; a; b; c
IF a > b THEN
temp = a
a = b
b = temp
END IF
IF a > c THEN
temp = a
a = c
c = temp
END IF
IF b > c THEN
temp = b
b = c
c = temp
END IF
PRINT "Izlazni redoslijed: "; a; b; c
END
Ispis na ekranu:
Riješeni zadaci Index
|