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

Чому дорівнює А після виконання оператора, якщо початкове значення А = 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;     

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

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

    Case А mod 10 of

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

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

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

         end;

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

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

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

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

    Case А of

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

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

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

        Else А := 100;

         end;

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