Составить программу в qbasic для нахождения квадрата наибольшего из двух чисел a и b

INPUT "A="; A
INPUT "B="; B
IF A > B THEN PRINT "Квадрат A равен"; A ^ 2
IF B > A THEN PRINT "Квадрат B равен"; B ^ 2