Составить программу вывода названия месяца в зависимости от его числа — QBasic(Бейсик)

CLS
INPUT "Vvedite nomer mesjaca:", n
SELECT CASE n
    CASE 1: PRINT "yanvar"
    CASE 2: PRINT "fevral"
    CASE 3: PRINT "mart"
    CASE 4: PRINT "aprel'"
    CASE 5: PRINT "maj"
    CASE 6: PRINT "ijun'"
    CASE 7: PRINT "ijul'"
    CASE 8: PRINT "avgust"
    CASE 9: PRINT "sentjabr'"
    CASE 10: PRINT "oktjabr'"
    CASE 11: PRINT "nojabr'"
    CASE 12: PRINT "dekabr'"
    CASE ELSE: END
END SELECT

Тестирование выполнено в программе QB64 ( Скачать )

Leave a Comment