Pascal ABC:
1. Приведите пример использования оператора условия.
2. Приведите пример использования оператора цикла.
3. Приведите пример использования операторов ввода-вывода.

program c2_2;var a: integer;begin  write('увядіте цэлы лік'); readln(a); if (a mod 2=0) then a:=a div 2; write (a); end.