ТутРешу.Ру

Даны целые числа a и b. Написать программу, которая выводит число 1…

Задание:

Даны целые числа a и b. Написать программу, которая выводит число 1, если числа равны, и число 0 в противномслучае

Решение:

Dim a As Integer Dim b As Integer a=InputBox ("Введите а") b=InputBox ("Введите b") If a=b Then MsgBox ("1") Else MsgBox ("0")




Знаете другой ответ?

Отправить свой ответ