Поліваріантне розгалуження

Чому дорівнює А після виконання оператора, якщо початкове значення А = 8?

Позначте одну правильну відповідь.

    Case А mod 10 of

        0..3 : A := A*2;

        3..5 : A := A+10;

        6..9 : A := A*10;

        end;

Чому дорівнює А після виконання оператора, якщо початкове значення А = 22?

Позначте одну правильну відповідь.

    Case А mod 10 of

        0..3 : A := A*2;

        3..5 : A := A+10;

        6..9 : A := A*10;

        end;  

Чому дорівнює А після виконання оператора, якщо початкове значення А = 22?

Позначте одну правильну відповідь.

    Case А mod 10 of

        0..3 : A := A*2;

        3..5 : A := A+10;

        6..9 : A := A*10;

        end;  

В яких операторах допущені помилки? (декілька варіантів відповіді)

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

Вивести у поле Edit1 кількість цифр в цілому числі А, що належить діапазону від 1 до 999. (декілька варіантів відповіді)

Який оператор еквівалентний оператору  If A = 0 Then B := C Else B := D;  ?

Який оператор еквівалентний оператору If A<B Then H := X Else H := Y; ?

Який оператор еквівалентний оператору If A<B Then B := B–A Else A := A–B;  ?

Чому дорівнює А після виконання оператора, якщо початкове значення А = 9?

    Case А of

        0..3 : A := A*2;

        3..5 : A := A+10;

        6..9 : A := A*10;

        Else А := 100;

         end;