Найти сумму чисел от 1 до 5 на языке бейсик
Найти сумму чисел от 1 до 5 на языке бейсик
Гость
Ответ(ы) на вопрос:
ГостьSub Zadanie()
s = 0
for i = 1 to 5
s = s + i
next
MsgBox s
End Sub
Call Zadanie()
Не нашли ответ?
Похожие вопросы