Сколько времени проработали N комбайнов, если каждый следующий работал на 20 минут больше, чем предыдущий - VB
Формулировка задачи:
Пора сессий, ужасная пора.
Не могу решить несколько заданий по лабораторным, хочется получить зачет и забыть это как страшный сон, выручайте
Циклические алгоритмы
В поле по уборке урожая работало N комбайнов. Первый комбайн работал m ч., а каждый следующий на 20 минут больше, чем предыдущий. Написать программу рассчитывающую, сколько времени проработали N комбайнов. Нужно сделать 3 текст бокса. В первом вбивать количество комбайнов, во втором время сколько работает первый комбайн и в последнем сколько общее время работы всех комбайнов. Т.е если вводить количество комбайнов 1, то не должно прибавляться к общему времени 20 минут. И я не могу понять как сделать чтоб 20 минут прибавлялось к времени предыдущего и все это вместе складывалось. Нужно использовать алгоритм for, я чувствую это истина где-то рядом, надеюсь на вашу помощь. Заранее прошу прощения если создал тему не в том разделе, просто завтра уже сдавать, у меня паникаРешение задачи: «Сколько времени проработали N комбайнов, если каждый следующий работал на 20 минут больше, чем предыдущий»
textual
Листинг программы
Private Sub Command1_Click() Dim n%, v!, s! n = Val(Text1.Text) v = Val(Text2.Text) s = (2 * v + (n - 1) / 3) * n / 2 Text3.Text = s End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д