Цикл з післяумовою

Скільки разів виконається цикл, якщо початкове значення Х=7?

     Repeat X := X+1 untіl X>10; 

Визначте, який оператор реалізує дію:

Збільшувати значення змінної А на 2 доти, доки А<20

Відмітьте ознаки циклу Repeat…Untіl

Скільки разів виконається цикл, якщо початкове значення Х=11?

        Repeat X := X+1 untіl X>10;

Яке значення S буде виведено в текстове поле?

var N,d,S: Integer;

begin

   N := 345; S := 0;

   Repeat

      d := N mod 10;

      S := S+d;

      N := N div 10;

   Until N=0;

   Edit2.Text := IntToStr(S);

end