Přidat otázku mezi oblíbenéZasílat nové odpovědi e-mailem Pascal

Zdravím,mám takový dotaz učím se programovat v Pascalu, přes online kurzy a mám napsat tenhle velmi jednoduchý program

....
.....
......

begin
write('Zadej heslo');
read(A);
if A='Ahoj'
then
begin ClrScr;
textcolor(8);
write('spravne');
end
else
write ('Spatne')

end.

A můj dotaz je ten,že bych potřeboval poradit,jestli by se nějak nedalo připsat,aby program při špatném zadání hesla (A);
znovu vyžádal napsání hesla,aby se to prostě opakovalo dokud by to A nebylo spravně.
Dík za odpověď

Předmět Autor Datum
nástřel,t5eba doladit begin repeat write('Zadej heslo'); read(A); if a='ahoj' then write('spravne'… poslední
MM_tank 26.03.2009 21:31
MM_tank

Zpět do poradny Odpovědět na původní otázku Nahoru