Turbo Pascalban hogyan kell használni a ReadKey-t?
Hogyan kell megírni olyan programot ami ha lenyomunk egy billentyut /pl programban ez az R /akkor vegrehajt valmi utasítást?
pl.
program readkey;
uses crtl
var t:char;
begin
write('readkey help valaki');
t:=readkey;
if t=#r then write('sekerult');
readln;
end.
ez nem mukodik...de hogyan kell megoldani h mukodjon.
válasza:és az ifnél
if t="r" then write('sikerűlt');
válasza:prog.ide.sk
Tanulmányozd ezt a honlapot, igaz, hogy ez free pascal, de csak a grafikus programozásnál különbözik a turbotól.
koszi szepen
de nem megy ezek a hibak javitasa utan sem.
válasza:harmadjára:
A program neve ne legyen readkey
program proba;
uses crt;
var t:char;
begin
t:=readkey;
if t="r" then write('sikerult');
readln;
end.
Meg mindig nem jo :S
Fatal: Syntax error, "THEN" expected but ":=" found
válasza:Így jó:
program proba;
uses crt;
var t:char;
begin
t:=readkey;
if t='r' then write('sikerult');
readln;
end.
válasza: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!