• составить программу для нахождения цифр четырехзначного числа
    Program n_221;
    var a, b, c, d, abcd: longint;
    что дальше??? Помогите плиз

Ответы 3

  • а не я не правильно прочёл условие час исправлю
    • Автор:

      nadeen
    • 6 лет назад
    • 0
  • всё
    • Автор:

      henrytflc
    • 6 лет назад
    • 0
  • var a,n : integer;beginreadln(a);  while a > 0 do  begin n:= a mod 10; a:= a div 10;writeln(n) end;end.
  • Добавить свой ответ

Войти через Google

или

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

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

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