Вопрос связан с Visual Basic

Помогите написать алгоритм, я не очень понимаю в информатике, помочь особо некому! Буду благодарен за ответ!

выполнить надо в Visual basic