Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
ikilan201
09.07.2020 23:17 •
Другие предметы
Охарактеризуйте развитие мануфактурного производства в России. В чём состояли его особенности по сравнению с западноевропейским?
Показать ответ
Ответ:
bogdanb13
02.06.2020 09:53
' 1)Напиши программу, выводящую на экран степени числа 3 в интервале от а до b включительно (а и b задаются пользователем).
Dim a As Integer
Dim b As Integer
Dim i As Integer
a = InputBox("Введите а")
b = InputBox("Введите b")
Dim msg As String
msg = ""
For i = a To b
msg = msg & 3 в степени " & i & " равно " & 3 ^ i & vbCrLf
Next
MsgBox(msg)
2)Найти все делители числа 1204.
Dim i As Integer
Dim msg As String
msg = ""
For i = 1 To 1204
If 1204 Mod i = 0 Then
msg = msg & "Число " & i & " является делителем 1204." & vbCrLf End If
Next
MsgBox(msg)
0,0
(0 оценок)
Популярные вопросы: Другие предметы
Sofa1351
02.10.2021 07:40
1. Из какого словаря эти словарные статьи. Выберите и запишите: орфографический, толковый, этимологический словарь. 1) РАДИО, нескл., ср передачи...
АэлинкаМалинка
09.01.2023 02:43
Рассмотри изображение блока независимого управления сравни их и выбери те в которых робот повернет налево...
apivo
15.12.2022 02:18
отмечу лучший ответ ...
beregnoy2017
14.01.2021 04:20
9.Какая отрасль растениеводства занимается выращиванием капусты, моркови, свёклы?10. Пшеничный пояс нашей страны:...
OoMaRиNкАoO
01.01.2023 03:52
Какие социальные изменения происходят в Казахстане во всех сферах общества?...
dimakolobanov2
02.12.2022 20:28
В настоящие время в мире существует государст ,а 100, б 300,в 150...
Artemka1610
31.01.2020 10:42
Матинде айтылган нагыз достыктын улгысын калай багалайсыз по братскии...
copekuti
25.09.2022 06:16
Назовите качества человека бережно относящегося к природе...
Vovndr
25.09.2022 06:16
5. Основное отличие скульптуры от остальных видов резьбы объяснить по человечески...
sofi200703
03.09.2020 21:08
Краеведение (8 класс) как музыкальное искусство духовному жителей Челябинского Урала...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Dim a As Integer
Dim b As Integer
Dim i As Integer
a = InputBox("Введите а")
b = InputBox("Введите b")
Dim msg As String
msg = ""
For i = a To b
msg = msg & 3 в степени " & i & " равно " & 3 ^ i & vbCrLf
Next
MsgBox(msg)
2)Найти все делители числа 1204.
Dim i As Integer
Dim msg As String
msg = ""
For i = 1 To 1204
If 1204 Mod i = 0 Then
msg = msg & "Число " & i & " является делителем 1204." & vbCrLf End If
Next
MsgBox(msg)