Цикл WHILEНаписать программку которая для хоть какого числа N выводит поочередно на

Цикл WHILE
Написать программку которая для любого числа N выводит поочередно на экран все его числа начиная с конца(разряда единиц)
(!Даю 20 баллов!)

Задать свой вопрос
1 ответ
Var S:string;
A,l,i:integer;
begin
Write('Chislo='); Readln(a);
Str(a,S);
l:=length(S);
for i:=l downto 1 do write(S[i],' ');
readln;
end.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт