Nejprve se musíme obrátit na uživatele a požádat o zadání třímístného čísla, které splňuje podmínku. Můžeme použít funkci ReadLn pro čtení zadaného čísla z klávesnice.
Zadání a ověření třímístného čísla
1. Prvním krokem je vyhlásit proměnnou, která uchová trojciferné číslo.
2. Poté pomocí příkazu vstupu z klávesnice musí uživatel zadat třímístné číslo.
3. Po zadání čísla je třeba zkontrolovat, zda jsou všechny číslice čísla sudá. K tomu lze použít operace dělení a odebrání zbytku z dělení na 2. Pokud je zůstatek dělení každé číslice 2 nulový, pak jsou všechny číslice čísla sudá.
number, digit1, digit2, digit3: integer;
writeln ('zadejte třímístné číslo:');
digit1: = number div 100; / / první číslice čísla
digit2: = (number div 10) mod 10; / / druhá číslice čísla
digit3: = number mod 10; / / třetí číslice čísla
if (digit1 mod 2 = 0) and (digit2 mod 2 = 0) and (digit3 mod 2 = 0) then
writeln ('zadané číslo je třímístné číslo, jehož všechna čísla jsou sudá.')
writeln ('zadané číslo není třímístné číslo, jehož všechna čísla jsou sudá.');
V tomto příkladu musí uživatel zadat trojciferné číslo, například 246.
Pokud jsou všechny číslice sudého čísla, zobrazí se na obrazovce zpráva: "zadané číslo je třímístné číslo, jehož všechny číslice jsou sudé."
Pokud je alespoň jedna z číslic čísla lichá, zobrazí se Zpráva na obrazovce: "Zadané číslo není třímístné číslo, jehož všechna čísla jsou sudá."
Vstup z klávesnice
V jazyce Pascal se pro zadávání dat z klávesnice používá funkce Readln. Tato funkce čte data zadaná uživatelem a přiřazuje je proměnné nebo poli.
Příklad psaní z klávesnice v Pascalu:
vara: Integer;beginWrite('Введите число: ');Readln(a);end.Při zadávání dat z klávesnice je třeba vzít v úvahu typ dat, na která se vztahují. Pokud uživatel zadá číslo, musí být proměnné přiřazen odpovídající číselný typ dat (např. Integer nebo Real).
Zadávání dat z klávesnice je důležitou součástí programování a jejich získání pro další zpracování. Správné zpracování zadávání dat pomáhá spravovat program a vytvářet funkčnější aplikace.
Kontrola trojcifernosti
while temp > 0 do
temp := temp div 10;
digits := digits + 1;
if digits <> 3 then
writeln ('chyba. Zadejte trojciferné číslo.');
Po kontrole trojmístnosti je tedy možné bezpečně pokračovat v provádění programu s vědomím, že zadané číslo splňuje požadavky.
Kontrola parity číslic čísla
varnum: integer;beginwriteln('Введите трехзначное число:');readln(num);if (num < 100) or (num >999) thenwriteln('Число не является трехзначным.')else if (num mod 2 = 0) thenbeginwriteln('Введенное число является трехзначным и содержит только четные цифры.');writeln('Введенное число: ', num);endelsewriteln('Введенное число является трехзначным, но содержит нечетные цифры.');end.
Tento kód tedy umožňuje ověřit třímístné číslo na přítomnost pouze sudých číslic a odvodit toto číslo, pokud splňuje podmínku, nebo zprávu o přítomnosti lichých číslic v čísle.
if (digit1 mod 2 = 0) and (digit2 mod 2 = 0) and (digit3 mod 2 = 0) thenWriteLn('Число удовлетворяет условию');Zde jsou digit1, digit2 a digit3 proměnné, které ukládají hodnoty číslic třímístného čísla zadaného uživatelem.
Může se vám také líbit
Z klávesnice je zadáno třímístné číslo, pokud jsou všechny jeho číslice sudé (Python).
Python je výkonný a pohodlný programovací jazyk, který vám umožňuje řešit různé úkoly, včetně ověření parity třímístných čísel. Kontrola.
Jak kilaura funguje v Minecraftu
Kilaura je nástroj, který hráči Minecraftu používají k rychlému a pohodlnému pohybu po světě hry. Vytváří efekt létání a.
Kde se používají ARM procesory?
Arm (Advanced RISC Machine) je rodina mikroprocesorových architektur používaných v široké škále elektronických systémů a zařízení. Oni.
Jak spojit měděný drát s hliníkem
V oblasti elektriky a elektrotechniky je spojování měděných a hliníkových vodičů častým úkolem, který je třeba řešit. Nicméně, takové.
- Zpětná vazba
- Uživatelská smlouva
- Zásady ochrany osobních údajů