Visual BASIC

В задаче необходимо составить программу на алгоритмическом языке Visual BASIC. Причем, программа должны быть записаны в двух вариантах: в первом варианте необходимо использовать оператор условного перехода IF... Gо Tо, а во втором − операторы цикла For...To...Step, Next. Для облегчения решения задачи по ней даны краткие методические указания.
Составить программу расчета производительности тока (ц/ч) по формуле:
,
где У − урожайность с 1 га, ц; Р − площадь зерновых, тяготеющих к току, га; Тсм − время непосредственной работы за смену, ч; См − сменность (количество смен в сутки); Д − количество дней уборки по плану, дн.
Количество дней уборки изменяется в пределах от 10 до 20 дн. с шагом 1 дн. (У = 30 ц, Р = 800 га, Тсм = 6 ч, См = 2).