Kezdőoldal » Számítástechnika » Internet » Pascal, error, mi a hiba?

Pascal, error, mi a hiba?

Figyelt kérdés

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?


2010. ápr. 1. 12:04
 1/4 anonim ***** válasza:

Mit ír ki a fordító?

Bár ezt megkérdeztem a másik kérdésednél is.

2010. ápr. 1. 12:13
Hasznos számodra ez a válasz?
 2/4 A kérdező kommentje:

:D? jah onan szedtem:) öhm nem az akérdező vagyok :D



-2Fatal Error :D

2010. ápr. 1. 12:15
 3/4 anonim ***** válasza:

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.

2010. ápr. 1. 12:30
Hasznos számodra ez a válasz?
 4/4 A kérdező kommentje:
thx müködik:)
2010. ápr. 1. 12:45

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

A weboldalon megjelenő anyagok nem minősülnek szerkesztői tartalomnak, előzetes ellenőrzésen nem esnek át, az üzemeltető véleményét nem tükrözik.
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!