1 solutions

  • 0
    @ 2025-11-5 16:02:17

    Pascal :

    var
    n:integer;
    begin
    repeat
    readln(n);
    until (n<100) and (n>9);
    write(n);
    end.
    
    • 1

    Information

    ID
    17459
    Time
    1000ms
    Memory
    128MiB
    Difficulty
    (None)
    Tags
    # Submissions
    0
    Accepted
    0
    Uploaded By