Přejít na hlavní obsah

Kontrola lichosti čísla v jazyce Pascal pomocí psaní z klávesnice

  • Pavlína Bártová
  • Postupy

Jazyk Pascal - jeden z nejpopulárnějších programovacích jazyků pro výuku studentů. Byl vyvinut v 70.letech a stále se používá v mnoha vzdělávacích institucích. Navzdory své jednoduchosti a malé sadě příkazů vám Pascal umožňuje provádět různé úkoly, včetně kontroly lichosti čísla.

Kontrola lichosti čísla - je to jedna ze základních programovacích operací. Koneckonců, někdy je nutné zkontrolovat, zda je dané číslo liché, aby bylo možné provést příslušnou následnou operaci. V Pascalu to lze provést pomocí konstrukce podmíněného operátora if. Tento operátor umožňuje programu rozhodovat podle hodnoty proměnné.

Řekněme například, že musíme zkontrolovat, zda je číslo zadané uživatelem z klávesnice liché. K tomu můžeme použít podmíněný operátor if. Pokud je číslo rozděleno na 2, zbytek dělení bude 0, což znamená, že číslo je sudé. Jinak je číslo liché.

Kontrola lichosti čísla v jazyce Pascal

V jazyce Pascal lze ke kontrole lichosti čísla použít operaci nalezení zbytku z dělení čísla 2. Pokud je zůstatek 1, znamená to, že číslo je liché, pokud je zůstatek 0, znamená to sudé číslo.

Chcete-li zkontrolovat lichost čísla v jazyce Pascal, můžete napsat následující kód:

program CheckOddNumber;varnumber: integer;beginwrite('Введите число: ');readln(number);if number mod 2 = 1 thenwriteln('Число ', number, ' является нечетным.')elsewriteln('Число ', number, ' является четным.');end.

Program nejprve požádá uživatele o zadání čísla pomocí funkce readln . Poté provede operaci nalezení zbytku z dělení čísla na 2 pomocí příkazu mod . Pokud je zůstatek 1, program zobrazí zprávu, že číslo je liché, jinak se zobrazí zpráva, že číslo je sudé.

Vstup z klávesnice

Jedním z důležitých aspektů programování v jazyce Pascal je možnost interakce s uživatelem. K tomu slouží vstup z klávesnice. Vstup z klávesnice umožňuje programu přijímat data od uživatele během provádění programu.

Pro psaní z klávesnice se v jazyce Pascal používá postup ReadLn. Pomocí tohoto postupu lze počítat data zadaná uživatelem a uložit je do proměnné.

Procedura ReadLn bere jako parametry proměnné, do kterých bude uložena zadaná hodnota. Pokud je například nutné zadat celé číslo, lze použít následující návrh:

varX: Integer;
begin
ReadLn(X);
end.

V tomto příkladu proměnná X bude obsahovat hodnotu zadanou uživatelem. Po provedení postupu ReadLn program přejde na následující pokyny.

Psaní z klávesnice se často používá při psaní programů, kde je nutné přijímat data od uživatele k dalšímu zpracování. Pomocí psaní z klávesnice lze implementovat mnoho zajímavých a užitečných funkcí-od kalkulačky po hry.

Celé číslo

V Pascalu mohou být celá čísla reprezentována s různou přesností, jako je typ dat Integer nebo Longint. Přesnost určuje rozsah hodnot, které lze v tomto typu dat uložit.

Celá čísla lze použít pro matematické operace, jako je sčítání, odčítání, násobení a dělení. Operace s celými čísly se provádějí podle matematických pravidel a mají svá specifika.

Důležitým aspektem práce s celými čísly v Pascalu je kontrola parity nebo lichosti. K tomu lze použít operaci modulu, která vrátí zbytek z dělení jednoho čísla na druhé. Pokud je zbytek dělení 2 0, pak je číslo sudé, jinak liché.

Podmíněný příkaz

V jazyce Pascal umožňují podmíněné příkazy programu provádět různé akce v závislosti na podmínkách.

Jedním z nejběžnějších podmíněných operátorů je operátor if. Umožňuje programu splnit určitý kód, pouze pokud je určitá podmínka pravdivá. Syntaxe příkazu if je následující:

if podmínka then

// spustit kód

end;

V tomto případě, pokud je podmínka pravdivá, bude kód splněn, jinak bude kód vynechán.

Kromě příkazu if používá Pascal také příkaz else, který umožňuje splnění určitého kódu, pokud je podmínka příkazu if nepravdivá. Syntaxe příkazu if-else je následující:

if podmínka then

// spustit kód

else

// spustit jiný kód

end;

Pascal má také k dispozici příkazy case a switch, které vám umožňují vybrat spouštěcí kód v závislosti na hodnotě proměnné. Syntaxe příkazu case je následující:

case proměnná of

hodnota 1: / / spustit kód

hodnota2: / / spustit kód

end;

V tomto případě, v závislosti na hodnotě proměnné, bude proveden příslušný kód. Pokud se žádná hodnota neshoduje, bude spuštěn výchozí kód.

Funkce kontroly lichosti

V jazyce Pascal lze k ověření lichosti čísla použít příkaz dělení modulem. Operátor dělení modulem vrací zbytek z dělení dvou čísel. Pokud je zůstatek dělení číslem 2 1, pak je číslo liché, jinak sudé.

Níže je tabulka funkce kontroly lichosti čísla v jazyce Pascal, která používá příkaz dělení modulem:

function isOdd(num:integer):boolean;beginif num mod 2 = 1 thenisOdd := trueelseisOdd := false;end;

Příklad použití funkce isOdd :

varnumber: integer;beginwrite('Введите число: ');readln(number);if isOdd(number) thenwriteln('Число ', number, ' является нечётным')elsewriteln('Число ', number, ' является чётным');end.

Po zadání čísla z klávesnice jej funkce isOdd zkontroluje na nejasnosti a zobrazí příslušnou zprávu na obrazovku.

Závěr výsledku

Po ověření zadaného čísla program zobrazí výsledek na obrazovce uživatele. K tomu slouží operátor writeln jazyka Pascal.

Pokud je číslo liché, program zobrazí zprávu:

writeln ('číslo', num, ' je liché.');

V tomto příkladu proměnná num obsahuje zadané číslo.

Pokud je číslo sudé, program zobrazí zprávu:

writeln ('číslo', num, ' je sudé.');

Po ukončení projektu program ukončí svou činnost.