Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Zadatak iz Pascala

[es] :: Pascal / Delphi / Kylix :: Zadatak iz Pascala

[ Pregleda: 1879 | Odgovora: 1 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

babukica
rusmir adilovic

Član broj: 171271
Poruke: 7
91.191.24.*



Profil

icon Zadatak iz Pascala30.01.2008. u 21:19 - pre 197 meseci
Molim sve koji znaju da mi pomognu

Zadatak:Napisi program koji broj unesen sa tastature ispisuje obrnutim redom cifara.Korisnik sa tastature
unosi brojeve sve dok se ne unese jednocifreni broj.
 
Odgovor na temu

reiser

Član broj: 7895
Poruke: 2314



+102 Profil

icon Re: Zadatak iz Pascala30.01.2008. u 22:48 - pre 197 meseci
Otprilike ovako, iz glave:

Code:

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.

 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: Zadatak iz Pascala

[ Pregleda: 1879 | Odgovora: 1 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.