Aktív témák

• #27 Szalma őstag KovacsUr #26

  2003-04-18 19:44:01 #27

  Ö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

  

  Szalma

  őstag

  válasz KovacsUr #26 üzenetére

  OFF
  
  Aha. Oberon: a programnyelvek/oprendszerek/fordítók Csimborasszója. :) Aki ennél jobbat tud, az csal. :) ~7000 sor (persze csak 3-4 alapszintű driverrel) a natív PC-s Oberon, ami egyben fejlesztőkörnyezet és operációsrendszer. És végtelenül letisztult. (''Nem kellenek ikonok, hiszen az ember nem azért tanult meg olvasni, hogy semmitmondó képecskékből következtessen a kattintás végeredményére...'', Wirth.)
  
  ON
  
  Igaziból a Modula-2 jobban fekszik, mert az még keret független volt. Nagyon ütős natív thread támogatással... :) (Vagy 3 éven keresztül M2-ben dolgoztam...)
  
  Szeretettel:
  Szalma

• #25 Szalma őstag KovacsUr #24

  2003-04-18 19:19:37 #25

  Ö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

  

  Szalma

  őstag

  válasz KovacsUr #24 üzenetére

  Persze, nem kretén: a legjobban letisztult nyelveket köszönhetjük neki, amik Neumann rendszerű gépre készültek. :))
  
  Szeretettel:
  Szalma

• #22 KovacsUr addikt KovacsUr #20

  2003-04-18 19:05:41 #22

  Ö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

  

  KovacsUr

  addikt

  válasz KovacsUr #20 üzenetére

  Sőt, megnéztem: az eredeti Pascal szabvány szerint kifejezetten helytelen az utolsó utasítás után kitenni a pontosvesszőt. Mik nem vannak :))

• #19 Parci HÁZIGAZDA KovacsUr #17

  2003-04-18 18:57:06 #19

  Ö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

  

  Parci

  HÁZIGAZDA

  válasz KovacsUr #17 üzenetére

  Huhúúú, ettől kitépem a hajam!
  
  A logika ugye az, hogy minden utasítást pontosvessző terminál. Az egy dolog, hogy a Pascal compiler olyan kretén, hogy elfogadja így is (utolsó utasításnál nincs pontosvessző), de egy igazi tököslegény :P azért korrekt és konzisztens!

• #18 Panther HÁZIGAZDA KovacsUr #17

  2003-04-18 18:47:01 #18

  Ö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

  

  Panther

  HÁZIGAZDA

  válasz KovacsUr #17 üzenetére

  Aha. Kösz :)
  
  FTC: épp azért kérdeztem, amit válaszolt; mert nem voltam benne biztos hogy oda kell vagy sem, és érdekelt hogy ha nem kell, akkor miért. Pascalban nem vagyok menő ugyanis :DDD

• #15 Panther HÁZIGAZDA KovacsUr #4

  2003-04-18 17:59:42 #15

  Ö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

  

  Panther

  HÁZIGAZDA

  válasz KovacsUr #4 üzenetére

  A ''readln(szam[i])'' után miért nincs '';''?

• #9 ftc nagyúr KovacsUr #8

  2003-04-18 17:36:16 #9

  Ö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

  

  ftc

  nagyúr

  válasz KovacsUr #8 üzenetére

  És milyen könyv?Nálunk ilyeneket nem tanítanak.Nálunk,számtechen jobban a and,nand stb kapukat tanítsák.

• #7 ftc nagyúr KovacsUr #6

  2003-04-18 17:28:11 #7

  Ö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

  

  ftc

  nagyúr

  válasz KovacsUr #6 üzenetére

  Menni fog!Amúgy mi a feltételeknél az az inc?

• #5 ftc nagyúr KovacsUr #4

  2003-04-18 17:24:22 #5

  Ö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

  

  ftc

  nagyúr

  válasz KovacsUr #4 üzenetére

  Értem már!Kösz:)

• #4 KovacsUr addikt KovacsUr #2

  2003-04-18 17:22:07 #4

  Ö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

  

  KovacsUr

  addikt

  válasz KovacsUr #2 üzenetére

  pld.
  
  const
    MAX_SZAM = 5;
  
  var
    i: integer;
    szam: array[1..MAX_SZAM] of integer;
    pozitiv, negativ: integer;
  
  begin
  
    pozitiv := 0;
    negativ := 0;
  
    for i := 1 to MAX_SZAM do begin
      write(i,'. szam: ');
      readln(szam[i])
    end;
  
    for i:= 1 to MAX_SZAM do begin
      if szam[i] > 0 then inc(pozitiv)
      else if szam[i] < 0 then inc(negativ);
    end;
  
    writeln('Pozitiv: ', pozitiv, ' Negativ: ', negativ, 'Nulla: ', MAX_SZAM-(pozitiv+negativ));
  end.

• #3 ftc nagyúr KovacsUr #2

  2003-04-18 17:19:40 #3

  Ö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

  

  ftc

  nagyúr

  válasz KovacsUr #2 üzenetére

  Igen így.És ezt hogy?

Aktív témák