Введенные числа распечатать в обратном порядке

@VonOss1 · Регистрация: 07.12.2012

Написать рекурсивную процедуру, которая считывает вводимые с клавиатуры числа до тех пор, пока не будет обнаружен нуль. Затем введенные числа распечатываются в обратном порядке. Нуль тоже печатать.

@Puporev · 07.12.2012, 12:21

Pascal

uses crt;
procedure chisla;
var a: integer;
begin
clrscr;
writeln('Введите число');
readln(a);
if a <> 0 then
 begin
  chisla;
  writeln(a);
 end;
end;
 
begin
  chisla;
end.

@VonOss1 0 / 0 / 0 Регистрация: 07.12.2012 Сообщений: 7
		1
	Введенные числа распечатать в обратном порядке 07.12.2012, 12:13. Показов 1712. Ответов 1 Метки нет (Все метки) Написать рекурсивную процедуру, которая считывает вводимые с клавиатуры числа до тех пор, пока не будет обнаружен нуль. Затем введенные числа распечатываются в обратном порядке. Нуль тоже печатать. 0

Опции темы

Введенные числа распечатать в обратном порядке

Решение