Prosíme přihlašte se nebo zaregistrujte.

Přihlašte se svým uživatelským jménem a heslem.
Vaše pomoc je stále potřeba!

Autor Téma: spustenie pascalovských programov  (Přečteno 1283 krát)

Tino243

  • Návštěvník
  • Příspěvků: 3
spustenie pascalovských programov
« kdy: 19 Dubna 2012, 08:44:49 »
Mám spraviť projekt do školy a bol som donútený použiť pascal :-\. Stiahol som kompilátor, skompiloval som, ale nejak sa mi nedá ten program spustiť. Nepíše žiadnu chybu, iba proste  nespravý nič.

pacholik

  • Závislák
  • ***
  • Příspěvků: 2072
Re:spustenie pascalovských programov
« Odpověď #1 kdy: 19 Dubna 2012, 13:38:40 »
tak se aspoň poděl o ten program, nejsme věštírna ;)

Tino243

  • Návštěvník
  • Příspěvků: 3
Re:spustenie pascalovských programov
« Odpověď #2 kdy: 19 Dubna 2012, 16:18:29 »
Sorry, nepradpokladám že by bola chyba v programe pretože keď ho spustím cez IDE tak beží pekne. Neviem ale ak niečo najdeš tak budem rad.

program rec1;
TYPE
    student = object
                rawData : string;
                trieda         : string;
                meno           : string;
                priezvisko     : string;
                spravanie      : 1..4;
                matematika     : 1..5;
                informatika    : 1..5;
                o_absencia     : 1..200;
                no_absencia    : 1..20;
                procedure getDataFromString(content:String);
        END;
    procedure student .getDataFromString(content:String);
    begin
        rawData := content;
    end;
var ziak : student;
    sourceFile : text;
    line : string;
    i   : integer;

begin
        writeln('krok1');
        assign(sourceFile,'pokus.txt');
        rewrite(sourceFile);
        for i:=1 to 10 do begin
        writeln(sourceFile,'joujou');
        end;
        ziak.trieda := 'wtf';
        ziak.getDataFromString('blabla');
        writeln(ziak.rawData);
   writeln(ziak.trieda);
end.

Tino243

  • Návštěvník
  • Příspěvků: 3
Re:spustenie pascalovských programov
« Odpověď #3 kdy: 19 Dubna 2012, 16:23:14 »
Nie ani prázdny readkey|readln na konci nepomohól :-D

Martin Šácha

  • Člen občanského sdružení Ubuntu ČR a placené komunitní podpory
  • Administrátor fóra
  • ******
  • Příspěvků: 5153
Re:spustenie pascalovských programov
« Odpověď #4 kdy: 19 Dubna 2012, 20:57:24 »
Jakým kompilátorem/IDE kompilujete?
Mint MATE 64bit / DuckDuckGo.com
Programátoři považují WYSIWYG za špatné u kódu i u žen. Programátor chce "dostat to, co žádá“ – kód tajemný, neodpouštějící, nebezpečný.

 

Provoz zaštiťuje spolek OpenAlt.