Где ошибка? вот : из пункта а в пункт б движется велосипедист с постоянной скоростью v км/ч. через 1.5 часа после его старта из пункта а стартовал второй велосипедист, который двигался с постоянной скоростью 11 км/ч. построить алгоритм (нарисовать блок-схему) и составить программу на языке программирования для определения: догонит ли второй велосипедист первого во время своего движения при данных значениях расстояния между пунктами а и б и скоростей v. проверить программу на тестах при разных вариантах значений исходных данных. пояснение. программа должна вводить значения расстояния между пунктами а, б - s (км), время t (ч), скорость v (км/ч). в результате должно выводиться одно из двух сообщений: «догонит! » или «не догонит! ». будем считать, что если оба велосипедиста приехали в пункт б одновременно, то второй догнал первого. dim v1, v2, s, t as string private sub button1_click() v1 = textbox1 v2 = textbox2 s = textbox3 t = textbox4 if asc(s / v2 + t) < = asc(s / v1) then label1.caption= "догонит" else label1.caption = "не догонит" end if end sub

когда используете текстовые поля, нужно при использовании в программе сначала преобразовать тип данных - приограмма воспринимает все, что вводите в текстовую как текст. а значит работать корректно программа не будет - вычисления с текстом она делает по другому. нужно:

v1 = val (textbox1.text)

v2 = val (textbox2.text)

ы = val (textbox3.text)

во-первых, зачем тебе две скорости, когда скорость первого уже дана в условии(скорость первого 11 км/ч), поэтому вместо v1=textbox надо написать v1=11потом, при присваивании переменным значений, надо не просто писать textbox1 или textbox2, а писать надо val(textbox1.text) и так везде) и пользуйся лучше не 6 версией,   а на новой версии бейзика - на платформе .net )  удачи!

1)Себебі,сен тоққа түсіп қалуың мүмкін,сенің қауіпсіздік ережелерін сақтамағаныңнан компьютер істеп шығуы мүмкін

2)Себебі,көзің ауырып,арқа,мойын мүшелеріңе зиян келтіруі мүмкін.Компьютердің алдында қозғалыссыз ұзақ уақыт отырғандықтан дене мүшелерің ауыра бастайды

3)Информатика пәнінде біз компьютер қолданамыз,ал эргономика ыңғайлы жұмыс орнын тиімді ұйымдастыру туралы ғылым