Question

Сколько раз будет выполнен цикл?
repeat
read (N);
Sum := Sum+N;
until N=1

Answer 1

Цикл буде виконаний

Sum := Sum+N;