Определить число, получаемое выписыванием в обратном порядке цифр заданного натурального числа.

@6elka · Регистрация: 06.10.2009

Студворк — интернет-сервис помощи студентам

Задача простая для профессионалов но я не могу ее решить))

Определить число, получаемое выписыванием в обратном порядке цифр заданного натурального числа.

@Extremall · 06.10.2009, 19:12

Пожалуйста:

Delphi

var a,b,c:integer;
 
begin
write('Vvedite A : ');
readln(a);
b:=0;
while a<>0 do begin
  c:=a mod 10;
  b:=b*10+c;
  a:=a div 10;
end;
write(b);
readln;
end.

@6elka · 06.10.2009, 19:13 **[ТС]**

премного благодарна!!!

@6elka 10 / 1 / 0 Регистрация: 06.10.2009 Сообщений: 73
		1
	Определить число, получаемое выписыванием в обратном порядке цифр заданного натурального числа. 06.10.2009, 18:49. Показов 2979. Ответов 2 Метки нет (Все метки) Задача простая для профессионалов но я не могу ее решить)) Определить число, получаемое выписыванием в обратном порядке цифр заданного натурального числа. 0

@6elka 10 / 1 / 0 Регистрация: 06.10.2009 Сообщений: 73
	06.10.2009, 19:13 [ТС]	3
	премного благодарна!!! 0

Опции темы