1. ๖ۣۜCALL o'BOCK

   Прокачка WoT & Seller

   

   

   Статус:

   Оффлайн

   Joined:

   26.09.12

   Messages:

   699

   Репутация:

   368 +/-

   
   Помогите пожалуйста с решением)

    

   29.03.2015

   #1
2. 

3. Nimo

   

   

   Статус:

   Оффлайн

   Joined:

   06.01.13

   Messages:

   48

   Репутация:

   7 +/-

   Code:

   Type
     Numbers = (Zero, One, Two, Three, Four, Five);
   
   Var
     d : 0..5;
     n : Numbers;
   begin
     readln(d);
     n := Numbers(Ord(d));
     writeln(n);
     readln();
   end.

    

   30.03.2015

   #2
4. 

Your name or email address:

Do you already have an account?

• No, create an account now.
• Yes, my password is:
• Forgot your password?

Verification:

Введите число цифрами 493(Enter the number in digits 493)

Stay logged in