Войти
Регистрация
Спроси ai-bota
fedyuningleb20
18.04.2022 22:45
Написать программы с использованием оператора цикла с параметром: а) вывести на экран последовательность латинских букв б)вывести на экран все четные двузначные числа в)составить программу вывода на экран таблицы умножения на 7
Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
ostrom889p012wa
07.04.2023 19:17
Карточка 8 класс с решением....
ololoololoev1
13.11.2021 21:04
Для записи чисел в двоичной системе счисления используются цифры 0 и 1. Для записи чисел в десятичной системе счисления используются 10 арабских цифр. Некоторые...
lancerevol12p0cjct
13.11.2021 21:04
В сообщении, записано с символов алфавита, содержится 1044 символов. Найдите информационный объем этого сообщения.(ответ выразить в кбайтах). ...
marybyl86
20.04.2020 20:32
Запишите числа, следующие за данными:111110100(3), 176(8), 7DF(16) 101011011(2), 6ВВ(16),777(8)...
1Ліночка1
01.12.2021 04:30
Определите основание системы счисления для уравнения: 16х + 11х = 30х а) 6 б) 8 в) 10 г) 7...
элиза29с
28.01.2020 06:36
Составить программу вывода на экран следующей информации: а) 2 кг 13 17 б) а 1 19 b в)x y 5 y...
Keepcryingpikka
08.07.2021 09:44
Составить программу вывода на экран следующей информации: 2 кг 13 17 а 1 19 bx y 5 y а) б) в) в паскаль...
Anonim223332
08.07.2021 09:44
Сколько надо делить цифру.? или напишите просто ответы 77,58,121,271...
1Яблочко1
02.06.2023 20:51
Составить програму с использованием оператора цикла с предусловием или постусловием . одноклеточная амеба каждые 3 часа делится на 2 клетки. определить сколько амеб...
Sonyavishnya
09.03.2023 07:51
Написать программу в паскале : символы, стоящие на четных местах заменить на *. пользоваться можно только: pos,insert,delete,length,copy...
Ответ:
Elizaveta8614
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 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота