Matematické Fórum

zn · 08. 11. 2015 21:37

Dobrý den,
začínám s Pascalem a nevím, jak ošetřit, aby uživatel programu nezadal špatně proměnnou a program nezhavaroval.
Například: var cislo:integer; uživatel ale zadá písmeno, odentruje a je hotovo.
Za odpověď děkuji.

Eratosthenes · 08. 11. 2015 22:30

ahoj ↑ zn:

Toto asi nejlépe nějak takto:

Var VypisCisla :String;
Cislo :Integer;
ChybovyKod :Integer;

Begin

Readln(VypisCisla);
Val(VypisCisla,Cislo,CHybovyKod);
If CHybovyKod=0 then Writeln ('Bylo zadano cislo '+VypisCisla)
else Writeln ('Spatne zadani');

end;

zn · 08. 11. 2015 22:46

↑ Eratosthenes:
Ahoj a děkuji.
Netušil jsem, že se dá pracovat s chybovým kódem.
To Val(VypisCisla,Cislo,CHybovyKod); mi převádí vložené znaky na číslo a tím si ochráním, že se to nekousne?
Musím o tom ještě přemýšlet, ale funguje to, to jsem si zkusil.

Eratosthenes · 08. 11. 2015 23:11

ahoj ↑ zn:,

ano, je to tak. Funkce Val převádí řetězec na číslo. Pokud je převod korektní, je v chybovém kódu nula. Jestliže není, je tam číslo větší, podle kterého se dá vystopovat, co je tam špatně. Ty kódy se určitě dají najít někde v helpu.

Matematické Fórum

#1 08. 11. 2015 21:37

Pascal - jak ošetřit zadávání proměnné

#2 08. 11. 2015 22:30

Re: Pascal - jak ošetřit zadávání proměnné

#3 08. 11. 2015 22:46

Re: Pascal - jak ošetřit zadávání proměnné

#4 08. 11. 2015 23:11

Re: Pascal - jak ošetřit zadávání proměnné

Zápatí