Обусловьте, что будет выведено на экран после исполнения куска программки на

Определите, что будет выведено на экран после выполнения фрагмента программы на языке программирования Turbo Pascal: x := 0; y := 6; While y gt; 0 do begin y := y - 3; x := x + y; end; writeln (x=, x);