• Pascal

    1. Дано 3- х - значное число. Определить, входит ли в него цифра 6?

    2. Напечатать ряд чисел 20 20 20 20 20 20 20 20 20 20

Ответы 1

  • var

      n : integer;

    begin

      read (n);

      if (n mod 10 = 6) or (n div 100 = 6) or (n div 10 mod 10 = 6) then write ('yes') else write ('no');

    end.

     

    var

      i : integer;

    begin

      for i := 1 to 10 do write ('20 ');

    end. 

    • Автор:

      skyelara
    • 6 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years