Inf. dla 1A - L.53

Temat: Algorytmy warunkowe w Pascal (cz.2)
if ( warunek ) then
   begin
   .....
   end
   else
       begin
       ......
       end;
Zadanie: Napisz program w języku Pascal, który odczytywałby z klawiatury jedną całą liczbę, a następnie sprawdzałby, czy ta liczba jest większa, mniejsza lub równa zeru i wyprowadzałby na ekran odpowiedni wynik:

• Liczba jest dodatnia
• Liczba jest ujemna
• Liczba jest równa zeru.