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

• #1392 ViragL tag goldboy #1391

  Új Válasz 2006-12-14 21:14:32 #1392

  Ú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

  

  ViragL

  tag

  válasz goldboy #1391 üzenetére

  Nincs harag, semmi okom rá.

• #1390 ViragL tag goldboy #1389

  Új Válasz 2006-12-14 17:51:58 #1390

  Ú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

  

  ViragL

  tag

  válasz goldboy #1389 üzenetére

  Nem lecsesztelek, csak megjegyeztem, hogy bántja a szemem valami. Dolgozok, egyetemre járok, szabad időmben szivesen segítek itt ph!-n, ha tudok. Szivesen csinálom, de ha nem tetszik valami azt is megmondom, ez természetes, nem kell belőle nagy ügyet csinálni. Nem zaklatás, ha írsz a topikba, arra való, ha valakit nem érdekel amit írsz, az nem szól hozzá.
  
  

• #1387 ViragL tag goldboy #1383

  Új Válasz 2006-12-14 15:23:07 #1387

  Ú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

  

  ViragL

  tag

  válasz goldboy #1383 üzenetére

  ''nem tudjuk megjeleníteni delphiben'' ez a modatrész nagy fejtörést okozott számomra , de aztán leesett, vagyis remélem. Tehát, gondolom a btotyi által írt programokról van szó, nos ha megnézed a kódot, kiderül belőle, hogy ezek konzolos alkalmazások {$APPTYPE CONSOLE}, ami azt jelenti, hogy nincs grafikus felületük, tehát nincs is mit megjeleníteni (legalábbis abban az értelemben, ahogy te vártad), ezek a programok parancssorból futtathatóak.
  
  A topic célja nem az, hogy megírjuk hejetted a programot, hanem az, hogy segítsünk, ha problémába ütközöl. Segítünk, ha tudunk, de szerintem veled eszaladt kicsit a ló, a hangvételed és hozzáállásod is hagy kivánni valót maga után. Ha segít valaki, azt puszta szívjóságból tesz, ennek megfelelően kéne hozzáállni.
  
  [Szerkesztve]

• #1376 btotyi tag goldboy #1372

  Új Válasz 2006-12-13 18:43:20 #1376

  Ú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

  

  btotyi

  tag

  válasz goldboy #1372 üzenetére

  Nem tudom táblázatosan mit értesz de egy egyszerű progi :
  
  
  
  program Project2;
  
  {$APPTYPE CONSOLE}
  
  uses
    SysUtils;
  
  Var i : integer ;
    r : Extended;
  
  begin
    for i:= 1 to 20 do
    begin
     r := Sin(i) / i;
     Writeln(Format('%2d : %3.2n',[i,r]));
    end;
  end.
  

• #1375 btotyi tag goldboy #1371

  Új Válasz 2006-12-13 18:17:27 #1375

  Ú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

  

  btotyi

  tag

  válasz goldboy #1371 üzenetére

  Egy egyszerű megoldás.
  
  A magánhagzók felsorolását rád bízom. Azt, hogy üres stringet adtak-e meg azon felül pedig gyümölcsnevet illetve az egyéb hibákat nem ellenőrzi.
  
  
  program Project2;
  
  {$APPTYPE CONSOLE}
  
  uses
  SysUtils;
  
  Const
  MaganHangzok : set of char = ['a','á','e','é'.......];
  
  Var GyNev : String ;
  
  
  begin
     Write('Gyümölcs neve :');
     ReadLn(GyNev);
     if (GyNev[1] in MaganHangzok)
     then
       WriteLn('Magánhangzóval kezdődik')
     else
       WriteLn('Mássalhangzóval kezdődik');
  end.
  
  
  
  [Szerkesztve]

• #1374 ViragL tag goldboy #1371

  Új Válasz 2006-12-13 14:44:43 #1374

  Ú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

  

  ViragL

  tag

  válasz goldboy #1371 üzenetére

  Holnapra? Érzed. Bővebb határidőre, vagy ha korábban szólsz akkor összedobom neked, de most egy perc szabadidőm sincs. Tehát én passzolok.

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