Задача 15 Урок 9

Задача 15 Урок 9

У вас есть код:

var f : integer;
begin
  write('Введите число : ');
  readln(f);
  if f = 0 then
  else
    writeln('Не равно 0!');
 
  readln();
end.

-- который сообщает пользователю, что число не равно нулю, если это действительно так, или в обратной ситуации не делает вообще ничего.

Задача: Перепешите это код в неполной форме (без использования else).

var f: integer;
begin
  write('Введите число: ');
  readln(f);
  if not(f = 0) then
    writeln('Не равно 0!');
  readln();
end.  

Вывод консоли:

Введите число: 1
Не равно 0!

Введите число: 0