Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
bratatatnigep014kz
14.03.2022 10:03 •
Информатика
Написать программы с использованием оператора цикла с параметром: а) вывести на экран последовательность латинских букв б)вывести на экран все четные двузначные числа в)составить программу вывода на экран таблицы умножения на 7
Показать ответ
Ответ:
Demo180
01.10.2020 20:18
Пример реализации на VBA Excel
Код программ можете увидеть нажав 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
0,0
(0 оценок)
Популярные вопросы: Информатика
апельсинкабарбариска
20.11.2022 19:31
После редактирования статьи её объём уменьшился на 8 страниц. Каждая страница содержит 32 строки, в каждой строке 64 символа. Информационный объём статьи до редактирования...
тса2
09.03.2021 21:01
Сколько разрезов нужно сделать, чтобы разрезать круглый торт на N одинаковых по форме и размеру кусков? Например, для N=6 необходимо сделать 3 разреза, а для N=5...
vit7201
20.10.2020 04:26
Математические основы информатики 99.1 д) В & (А у вус) Количество логических переменных: Порядок выполнения логических операций: а B & (A V B v C) А В...
nazaroline
21.02.2021 09:36
Составить программу для решения следующей : дана последовательность символов,концом которой является точка.подсчитать,сколько в этой последовательности букв а....
диман160
21.02.2021 09:36
1. даны высказывания: а={3*3=9}, b={3*3=10}. определите истинность высказываний: 1) а, 2) ⌐в, 3) а& в, 4) в, 5) ⌐а, 6) а /\ в....
kristina1718
21.02.2021 09:36
Составить программу, которая определяет, являются ли разные точки с координатами (x1,y1) и (x2, y2) симметричными относительно осей координат или начала координат....
yulianyaght
13.05.2021 00:58
Напишите Доклад аппаратное обеспечение компьютера...
KarinaFelton
25.05.2021 02:31
Найти производную с фото...
TrinanenkoJulia
25.05.2021 02:31
13. Ордината точки пересечения прямой 3y - 4x + 6 = 0 с осью Oy равна… 1) -2; 2) 3; 3) -6 4) 1 1/3 5) 4...
И1111111111111111
23.06.2021 16:24
1. Геть одбившися од гурту, іде лицар в самотині. 2. Міст просто поєднав два протилежні береги , творячи ще одну нерухомість поміж їхнім одвічним спокоєм. 3. Зачувши...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Код программ можете увидеть нажав 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