турбо паскаль скласти програму яккка виводить на екран перші 10 парних чисел

элементов, и определяет, является ли эта последовательность возростающей.

3. Знайдіть помилки у наведених фрагментах програми, запишіть фрагмент правильно, пояснивши суть помилки:

а) x:=1; a:=81;

for i:=1 downto 10 do

begin

x:=x*i;

a:=a+2*i;

end;

б) х:=1; y:=1;

repeat

y:=y*x+2;

x:=x-2

until x-12;

4. Визначте значення всіх змінних у результаті їх виконання.

а) x:=0; y:=1;

while y<4 do

begin

x:=x+y;

y:=y+1

end;

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

repeat

i:=i+1;

x:=x+1/i;

until i>6;

5. Розробіть програму, яка виводитиме на екран значення квадратів та кубів натуральних чисел від 1 до n, де n>1 – натуральне число, значення якого задає користувач.

6. Розробіть програму, яка визначатиме суму парних чисел від 1 до 30.