Fórum Ubuntu CZ/SK
Ubuntu pro osobní počítače => Software => Příkazový řádek a programování pro GNU/Linux => Téma založeno: Tino243 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č.
-
tak se aspoň poděl o ten program, nejsme věštírna ;)
-
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.
-
Nie ani prázdny readkey|readln na konci nepomohól :-D
-
Jakým kompilátorem/IDE kompilujete?