• Введите семизначное натуральное число. Выведите все его цифры в прямом порядке на экран. Использовать циклический алгоритм. Пример:1234567. Цифры :1,2,3,4,5,6,7.

Ответы 2

  • Program z1;var i,a,b,c:integer;beginwrireln('Введите число');readln(a);while a<0 do beginb:=a mod 10;a:=a div 10;write(' ',b);end;end.
    • Автор:

      sladegthq
    • 6 лет назад
    • 0
  • var i,a,b,c:integer;beginwrite('Введите семизначное натуральное число: ');readln(a);c:=1000000;write('Цифры: ');while a>a mod 10 do beginb:=a div c;a:=a mod c;c:=c div 10;write(b,', ')end;write(a,'.')end.
    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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