Ниже на четырёх языках записан алгоритм. Получив на вход число х, этот алгоритм печатает два числа: L и 6. Укажите наибольшее из таких чисел х, при вводе которых алгоритм печатает сначала 3, а потом 9.

Бейсик

DIM X, L, М AS INTEGER
INPUT X
L = 0: M = 9
WHILE X > 0
    L = L + 1
    IF M > (X MOD 10) THEN
        M = X MOD 10
    END IF
    X = X \ 10
WEND
PRINT L
PRINT M

Паскаль

var x, L, M: integer;	
begin	
    readln(x);	
    L := 0; M 9;	
    while x > 0 do	
        begin	
            L := L + 1;	
            if M > (x mod 10) M := x mod 10; then
                M := x mod 10;
            x := x div 10;	
        end;	
    writeln(L); write(M);	
end.	

Си

#include<stdio.h>
void main()
{
    int x, L, M;
    scanf("%d" , &x) ;
    L = 0; M = 9;
    while (x > 0){
        L = L + 1;
        if M > x % 10 { 
            M = x % 10
        }
        x = x /10;
    }
    printf("%d\n%d", L, M) ;
}

Алгоритмический язык

алг	
нач	
    цел х, L, М	
    ввод X	
    L := 0; М := 9	
    нц пока х > 0	
        L : = L + 1	
        если М > mod(х,10)	то
            М := mod(х,10) 
        все	
        х := div(х,10)	
    кц	
    вывод L, нс, М	
кон