Разработать блок-схему алгоритма и написать программу для следующей задачи:

Ввести число. Если оно положительное, то на экран вывести сообщение "Положительное число"

Какая разница - прямые или ровные, всё равно углы скошенные=))

прости ...

Не обижаюсь=))

^)

Огромное спасибо за помощь!

Program T; Var Х : Integer; Begin             Write ('Введите число');       ReadLn (Х);             If Х > 0        Then    WriteLn ('Положительное число')                                    Else     WriteLn ('Отрицательное число') ;End.