tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Составьте программу, которая
Составьте программу, которая уменьшает первое число в 5 раз, если первое число больше второго по абсолютно величине (модулю) на языке visual basik заранее.
sonyafeldman
3 01.07.2019 08:10
1
Ответы
lenova32
24.07.2020 17:57
Sub Z()
Dim a As Integer
a = InputBox("1")
Dim b As Integer
b = InputBox("2")
If Math.Abs(a) > Math.Abs(b) Then a = a / 5
End Sub
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ponchikelo
10.09.2021 00:06
5.Створіть власний іб кодування даних. Презентуйте його в класі. Поясніть, кому такий іб кодування може бути корисним....
Алина12292006
23.09.2019 21:30
Даны вещественные числа a, b, c ( 0 a ). выяснить, имеет ли уравнение 2 0 ax bx c вещественные корни. если такие корни имеются, то найти их. в противном случае ответом должно...
РюЛайон
18.09.2019 22:40
Определить количество символов на одной странице рукописного журнала (n=32), если количество информации в нем равно 40 кb и всего 8 страниц....
marusya11102345
31.10.2020 11:25
За до якої програми створюють документи doex??? A) блокнот Б)word 2003 B) word 2007 Нам переписали запитання...
anyta141006
31.10.2020 11:32
Процессордың негізгі үш сипаттамасы...
Вквквквквк
31.10.2020 11:32
D1±d2±...±dn, где di - цифры(n 1). Вычислить записанную в тексте алгебраическую сумму Нужен код на Python!...
Алгебра111111111
31.10.2020 11:32
ИНФОРМАТИКА ТАБЛИЦЫ ИСТИННОСТИ 11 КЛАСС ЕГЭ (можно без подробного решения)...
danyarasporkin
31.10.2020 11:40
Найдите значение логических выражений. напишите на листочке развернутый ответ ...
ztv1978
31.10.2020 11:41
Установите соответствие. 1 Кеш-память 2 Регистры 3 Устройство управления 4 Арифметико- логическое устройство 5 Системная шина логические операции А обеспечивает последовательность...
егор23578584
31.10.2020 11:41
Дано натуральное число n. Вычислить: sqrt(3+sqrt(6+...+sqrt(3(n-1)+sqrt(3n Нужен код на...
Популярные вопросы
Сочинение владимиру владимировичу путина...
2
Какой частью речи является слово пуще (например: ещё пуще старуха хранится,опять...
1
Решите, или объясните как решать! 4^x=8; 3^x=9^x+1; 2^2x=2; 1|3^x-1=27;...
3
Синонимы и антонимы ко словам дрогнул и огонь...
1
Соедини отрезками пары точек у которых стоят связаны между собой и частные...
2
Какие пословицы поговорки говорят во времени...
1
Выбири те водные организмы которые обитают на дне морей и океанов; 1) бетнос...
1
Найдите значение выражения. (25-3,6)×(1,5+2,5)=...
1
Гомологов гексана является c6h12 c7h16 c6h6 c7h14...
1
Расскажите о значении процесса горения в промышленности ,в сельском хозяйстве,на...
2
Dim a As Integer
a = InputBox("1")
Dim b As Integer
b = InputBox("2")
If Math.Abs(a) > Math.Abs(b) Then a = a / 5
End Sub