Question

Определите, что будет на выходе в результате выполнения алгоритма. Запишите условие задачи, для решения которой составлен данный алгоритм.

var n: integer;
begin
n:=200;
while (n mod 18<>0) n:=n+1
writeln ('Ответ: ', n);
readln
end.

Answer 1

Ответ:

216.

Объяснение:

Есть число n=200. Пока оно не будет делится нацело на 18 мы будем прибавлять к нему 1. Так алгоритм дойдет до числа 216, завершит цикл и выведет ответ - 216.