Új hozzászólás Aktív témák

• #1630 Jolán csendes tag gaben #1

  Új Válasz 2006-11-19 17:12:07 #1630

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  Jolán

  csendes tag

  válasz gaben #1 üzenetére

  nekem sikerűlt begépeltem bár nem minden kellet hogy sikerüljön :
  Itt a cucc :
  
  Program paros;
  Var a:integer;
  Begin
  ReadLn (a);
  If a mod 2=0 then WriteLn ('paros')
  Else WriteLn ('paratlan');
  ReadLn;
  End.
  
  Remélem bejön
  
  [Szerkesztve]

Új hozzászólás Aktív témák