[МЭБИК] Программирование.Промежуточная аттестация МЭБИК (Билет 7)

Сдано на оценку 5 в 2025году.

Билет № 7

1. Правила организации циклов. Цикл с предусловием While.
2. Определите, что будет напечатано в результате выполнения следующего алгоритма?

var s, n: integer;

begin

s := 0;

n := 3;

while s*s*s < 123 do begin

s := s + 1;

n := n + 2

end;

writeln(n)

end.

3.Дан массив из 12 чисел целого типа. Найти элементы массива кратные 3 и возвести их в квадрат.