a := 2;
while a < 6 do
  writeln (a);
{az a ciklusváltozó nem növekszik!}