Заданы числа a и b. определить, эти числа одного или разных знаков

Пуск
ввод a,b;
Если (a>0 и b>0) или (a<0 и b<0), то Вывод: Одинаковые, иначе Вывод: Разные;
Останов.

Sub Задача()
Dim a, b As Integer
a = InputBox("Введите а!")
b = InputBox("Введите b!")
If (a >= 0 And b >= 0) Or (a < 0 And b < 0) Then
MsgBox ("Знаки одинаковые")
Else
MsgBox ("Знаки разные")
End If
End Sub

вот процедура на VBA (на нем записываются макросы в Microsoft Office)

и как-то так блок-схема рисуется :D

Сообщения, осведомляющие о положениеУ человека есть пять органов чувств (глаза, уши, нос, язык, кожа), которые позволяют ему получать информацию.Для того чтобы обеспечить качественную работу с информацией, необходимо прежде всего настроиться на быстрое чтение и продуктивное запоминание.Информационные процессы – это действия, выполняемые с информацией и направленные на достижение какого-либо результата.Имеющаяся у нас информация является весьма надежной, однако, учитывая конфиденциальный характер наших источников, из которых была получена информация, мы не можем действовать так, как они предлагаютя не понимаю вопрос Работа с информацией включает в себя три основных этапа: поиск, обработку и представление результатов.

Сообщения, осведомляющие о положениеУ человека есть пять органов чувств (глаза, уши, нос, язык, кожа), которые позволяют ему получать информацию.Для того чтобы обеспечить качественную работу с информацией, необходимо прежде всего настроиться на быстрое чтение и продуктивное запоминание.Информационные процессы – это действия, выполняемые с информацией и направленные на достижение какого-либо результата.Имеющаяся у нас информация является весьма надежной, однако, учитывая конфиденциальный характер наших источников, из которых была получена информация, мы не можем действовать так, как они предлагаютя не понимаю вопрос Работа с информацией включает в себя три основных этапа: поиск, обработку и представление результатов.