Question

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

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

Answer 1

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

Answer 2

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

Answer 3

прости ...

Answer 4

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

Answer 5

^)

Answer 6

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