Когда ставятся дополнительные логические скобки begin - end?

Задана следующая структура цикла.
x:=1;
while x<15 do
begin
if x mod 3 = 0
then writeln(x);
х:=x+1;
end;
Сколько будет выведено значений х?

В каких вариантах будут определены переменные кратные любому числу

Сколько раз будет выполенен следующий цикл?
x:=1;
while x>=5 do
begin
writeln(x);
х:=x+1;
end;

Что будет в результате выполения следующих действий?
x:=73;
a:=x div 10;
b:= x mod 10;
write(`a=`, a);
write(`b=`, b);

Задана следующая структура цикла.
k:= 0;
x:=1;
while x<20 do
begin
if x mod 5 = 0
then k:=k+1;;
х:=x+1;
end;
writeln(k)
Какое будет значений k?

Заданы три переменные. Как записать условие, чтобы расположить их в порядке убывания?

Выберите условия, при которых цикл выполнится 3 раза.