Pascal, error, mi a hiba?
Program Felelo;
uses crt; {randomhoz}
var string a,b;
i:integer;
begin {Felelok}
randomize();
write('1.Felelo: '); Readln(a);
write('2.Felelo: '); Readln(b);
i:=random(2);
if i=0 then
writeln('1.Felelo: ',a);
else
writeln('2.Felelo: ',b);
end.
hiba:D?
Mit ír ki a fordító?
Bár ezt megkérdeztem a másik kérdésednél is.
:D? jah onan szedtem:) öhm nem az akérdező vagyok :D
-2Fatal Error :D
Tényleg nagyon régen pascaloztam, több hibát is vétettem, úgyhogy inkább a teljes programot újra belinkelem:
Program Felelo;
uses crt; {randomhoz}
var a:string[20]; {rosszul deklaráltam a stringet}
b:string[20];
i:integer;
begin
randomize; {itt nem kell üres zárójel így randomize();}
write('1.Felelo: '); Readln(a);
write('2.Felelo: '); Readln(b);
i:=random(2);
if i=0 then
writeln('1.Felelo: ',a)
else
writeln('2.Felelo: ',b);
repeat until keypressed; {illetve enélkkül nem lehet a végeredményt látni, illetve lehet, de ahhoz újra vissza kell lépni}
end.
Kapcsolódó kérdések:
Minden jog fenntartva © 2024, www.gyakorikerdesek.hu
GYIK | Szabályzat | Jogi nyilatkozat | Adatvédelem | Cookie beállítások | WebMinute Kft. | Facebook | Kapcsolat: info(kukac)gyakorikerdesek.hu
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!