Программы с использованием операторов цикла с неизвестным числом повторений - VB

Формулировка задачи:

1) Написать программы с использованием операторов цикла с неизвестным числом повторений (do while| until…loop)и создать блок схемы по заданиям: - Найти t, при котором значение выражения (2+4+6+…+2t)/(1*2*3*t) становиться меньше 0,06. - Из пункта А в пункт В, расстояние между которыми S км, равномерно и прямолинейно движется материальная точка со скоростью V. При вводе V и S с клавиатуры вывести на экран в один столбец расстояния о материальной точки до пункта А через каждый час от начала движения до момента прибытия в пункт В. 2)...

Решение задачи: «Программы с использованием операторов цикла с неизвестным числом повторений»

textual
                            Листинг программы 
                        

                            Function Out() As Long
   Out = Out + 1
End Function
                        