ПОМОГИТЕ,ПОЖАЛУЙСТААА.
Написать программы с использованием оператора цикла с параметром:
а) Вывести на экран последовательность латинских букв
б)Вывести на экран все четные двузначные числа
в)Составить программу вывода на экран таблицы умножения на 7
Написать программы с использованием оператора цикла с параметром:
а) Вывести на экран последовательность латинских букв
б)Вывести на экран все четные двузначные числа
в)Составить программу вывода на экран таблицы умножения на 7
More Questions From This User See All
Answers & Comments
Код программ можете увидеть нажав Alt+F11
Основные операторы такие же как в других языках
Sub Буква()
For i = 65 To 122
строка =строка + 1
Cells(строка, 3) = Chr(i)
Next i
End Sub
Sub цифра()
For i = 10 To 99
If i / 2 = Int(i / 2) Then
строка= строка+ 1
Cells( строка, 3) = i
End If
Next i
End Sub
Sub Умнож7()
For i = 1 To 100
строка= строка + 1
Cells( строка, 3) = Str(i) + "x 7 = " + Str(i * 7)
Next i
End Sub