i:=6; while i<6 do i:=i+3;
500 ms 32 Mb Правила оформления программ и список ошибок при автоматической проверке задач