Премини към съдържанието

    Препоръчан отговор


    Здравейте! Има една задача, която дори не знам как да я реша, и ако може някой да ми помогне ще съм му много благодарен :) 

    Мъча се да направя един Console Application, който при въвеждане на номер от 1 до 7 примерно въведа 1 и ми показва Понеделник, въведа 5 и ми въвежда петък и т.н.. Някой може ли да удари едно рамо?

    Сподели този отговор


    Линк към този отговор
    Сподели в други сайтове

    Module Module1
    
        Dim weekdays(8) As String
    
        Dim a As Integer
        Dim b As String
    
        Sub init()
            weekdays(1) = "Monday"
            weekdays(2) = "Tuesday"
            weekdays(3) = "Wednesday"
            weekdays(4) = "Thursday"
            weekdays(5) = "Friday"
            weekdays(6) = "Saturday"
            weekdays(7) = "Sunday"
        End Sub
    
        Sub Main()
            init()
    r1:
            Console.WriteLine("Input a number from 1 to 7")
            b = Console.ReadLine()
            a = CInt(b)
            If a > 7 Then GoTo r2
            Console.WriteLine(weekdays(a))
            GoTo r1
    r2:
        End Sub
    
    End Module

     

    Редактирано от Реджеп Иведик (преглед на промените)

    Сподели този отговор


    Линк към този отговор
    Сподели в други сайтове

    Жив и здрав! :)

    Сподели този отговор


    Линк към този отговор
    Сподели в други сайтове

    Регистрирайте се или влезете в профила си за да коментирате

    Трябва да имате регистрация за да може да коментирате това

    Регистрирайте се

    Създайте нова регистрация в нашия форум. Лесно е!

    Нова регистрация

    Вход

    Имате регистрация? Влезте от тук.

    Вход


    ×

    Информация

    Този сайт използва бисквитки (cookies), за най-доброто потребителско изживяване. С използването му, вие приемате нашите Условия за ползване.