• Пишет Неожиданный символ ' ' строка 2 в PascalABC
    Вот текст программы:
    var
      n, h, m, s : integer;
    begin
      read(n);
      n := n mod (3600*24);
      h := n div 3600;
      m := n mod 3600 div 60;
      s := n mod 60;
      writeln(h div 10, h mod 10, ':', m div 10, m mod 10, ':', s div 10, s mod 10);
    end.


Ответы 2

  • Не пойму, что его не устраивало в моем варианте. Всегда так писал, а в этот раз не принял.
    • Автор:

      pablota0t
    • 5 лет назад
    • 0
  • Попробуйте может так:var n, h, m, s: integer;beginread(n);n:= n mod (3600*24);h:= n div 3600;m:= n mod 3600 div 60;s:= n mod 60;writeln(h div 10, h mod 10, ':', m div 10, m mod 10, ':', s div 10, s mod 10);end.
    • Автор:

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

Войти через Google

или

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

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

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