Shift + Alt типично. или в настройках языка
// Выбирайте, тут три цикла, while, repeat и for
//------------------------
program LoopWhile;
begin
var (a, b) := (-10, 10);
while a <= b do
begin
Println(a, Abs(a));
a += 1
end;
end.
//------------------------
program LoopRepeat;
begin
var (a, b) := (-10, 10);
repeat
Println(a, Abs(a));
a += 1
until a > b;
end.
//------------------------
program LoopFor;
begin
var (a, b) := (-10, 10);
for var i := a to b do
Println(i, Abs(i));
end.
Иванов пришёл и провёл 6 уроков подряд
Петров пришёл ко 2 уроку и провёл 4 урока подряд
Сидоров пришёл к 1 уроку, провёл подряд 2 урока и ушёл домой
Окон нету. Таблица в приложении