Készítette: Csontos 2009. március 28. 13:26:49 - 6440 megtekintés
Az alábbi tippben a Pascal programozási nyelv alapjaiba nyújtunk betekintést, először a repeat until ciklust tanulhatjuk meg.
Amire szükségünk lesz
számítógép
A repeat until ciklus
user crt;<br />
var<br />
a.b:string; // megadjuk a változókat<br />
begin<br />
clrscr // képernyő törlése<br />
a:= ’Videosmart’; // megadjuk a változó értékét, ha szöveg az érték, akkor mindig ’aposztrof közé kell rakni’<br />
repeat // a repeat ciklus indítása<br />
writeln <’Hova töltöm fel ezt a videót?’>;<br />
readln<b>;<br />
if a-b then writeln <’Jó’> // ha a-b akkor azt írja ki, hogy Jó, ha nem akkor pedig Rossz. A sor végére nem teszünk pontosvesszőt, mert ez a két utasítás egybe tartozik<br />
else writeln <’Rossz’>;<br />
until a-b; // addig kérdezi, amíg nem adjuk meg a jó választ<br />
readln; // vár az enter lenyomására, így nem lesz vége a programnak azonnal<br />
end.<br />
Nos drpuma a kérdésedre Zerocool.hu már válaszolt almikoko válasz: Beszédhibás vagyok és gondoltam valakit idegesíteni fogok vele ám a többi videómba már van beszéd ha zavar hát zavar remélem nem fog!!
Nos drpuma a kérdésedre Zerocool.hu már válaszolt almikoko válasz: Beszédhibás vagyok és gondoltam valakit idegesíteni fogok vele ám a többi videómba már van beszéd ha zavar hát zavar remélem nem fog!!