Складання алгоритмів опрацювання велечин

Який оператор реалізує дію:

Якщо ціле число А парне, поділити його на 2, в протилежному випадку помножити на 10.

Визначте, якого значення набуває змінна В після виконання фрагмента програми. 

var A, B, C, Max: Integer;

begin

A := 13; B := 12;

If A > B*B Then B := A-B;

If B > A-1 Then begin B := B-A; 

A:= A-B end

Else begin A := A-B;

Визначте, чому дорівнює S після виконання циклу:

     S := 0; For і := 5 To 7 Do S := S+1;

В яких із наведених операторів циклу тіло циклу не виконається жодного разу?

Визначте, чому дорівнює F після виконання циклу:

  F := 1; A:= 3;

  For i := 1 To 3 Do F:= F * A; 

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

  Whіle Х <= 10 do X := X+1;

Визначте значення S після виконання операторів:

     X := 0 ; S := 0;

     Whіle Х<=5 Do begin

       X := X + 1; 

       S := S + 1; end;

Визначте ознаки циклу Do..While.

Чому дорівнює Х після виконання циклу:

x := 1; While x<5 do x := x*2;