Question

СРОЧНОО
Установить взаимно-однозначное соответствие:
1) For k:=1 to 5 do write('*')
2) For k: 10 downto 2 do write('*')
3) x:=1;
While 0<x<10 do
begin
writeln (x);
end;
4) x:=1;
While x<0 do
begin
writeln (x);
x:=x-1
end;
а) Тело цикла не выполнится ни разу
б) Тело цикла выполнится 5 раз
в) Тело цикла выполнится 8 раз
г) Тело цикла будет выполняться бесконечно ​

Answer 1

1) `For k := 1 to 5 do write('*')` - Тело цикла выполнится 5 раз, так как `k` будет изменяться от 1 до 5.

2) `For k := 10 downto 2 do write('*')` - Тело цикла выполнится 8 раз, так как `k` начинается с 10 и уменьшается до 2.

3) `x := 1; While 0 < x < 10 do ...` - Тело цикла будет выполняться бесконечно, так как условие `0 < x < 10` всегда будет истинным, и `x` не изменяется внутри цикла.

4) `x := 1; While x < 0 do ...` - Тело цикла не выполнится ни разу, так как условие `x < 0` никогда не будет истинным при начальном значении `x`, и `x` не изменяется внутри цикла.

Итак, взаимно-однозначное соответствие:

1) Тело цикла выполнится 5 раз - соответствует циклу 1.

2) Тело цикла выполнится 8 раз - соответствует циклу 2.

3) Тело цикла будет выполняться бесконечно - соответствует циклу 3.

4) Тело цикла не выполнится ни разу - соответствует циклу 4.