Даны три действительных числа a, b, c. Найти наибольшее из них — QBasic(Бейсик)

CLS
INPUT "CHISLO 1", a
INPUT "CHISLO 2", b
INPUT "CHISLO 3", c
IF a > b THEN max = a ELSE max = b
IF c > max THEN max = c
PRINT max