Оператор цикла с постусловием (цикл-До)

Формат оператора:

repeat <тело цикла> until <логическое выражение>

Повторение выполнения тела цикла заканчивается, когда логическое выражение принимает значение true (истина).

Задания:

1. Определить значения переменных после выполнения фрагментов программы.

а) S:=0; i:=2;

Repeat i:=2*i; S:=S+i;

Until i>5;

б) S:=0; i:=1;

Repeat S:=S+1/i; i:=i-1;

Until i<=1;

в) S:=0; i:=5;

Repeat i:=2*i; S:=S+i;

Until i>5;

2. Дано натуральное число.
а) Верно ли, что сумма его цифр больше 10?
б) Верно ли, что количество его цифр есть четное число?
в) Определить, есть ли в нем цифра а.

3. Составить программу планирования закупки товара в магазине на сумму, не превышающую заданную величину.

4. Вычислить сумму натурального ряда чисел от 1 до N. Составить две программы: одну с использованием оператора цикла while, другую – с использованием оператора repeat.