Определите, сколько раз выполнится тело цикла, а также последнее число, которое будет выведено на экран в процессе выполнения программы. В ответе запишите два числа через пробел: сначала сколько раз выполнится цикл, затем последнее выведенное число. Если программа ничего не выводит на экран, то в вместо второго числа напишите слово
None.
var n: integer;
begin
n := {1};
while n >= {2} do
begin
writeln(n);
n := n - {3};
end;
end.