Zadatak:Napisi program koji broj unesen sa tastature ispisuje obrnutim redom cifara.Korisnik sa tastature
unosi brojeve sve dok se ne unese jednocifreni broj.
var
broj : Integer;
tmp : Integer;
C1 : Integer;
begin
repeat
ReadLn(broj);
tmp := broj;
While tmp > 0 Do
Begin
Write(tmp mod 10);
tmp := tmp div 10;
End;
WriteLn;
until broj = 0;
end.