Program v Pascalu – Pascal – Fórum – Programujte.com

Dobrý den,

potřeboval bych pomoc s vyřešením úkolu. Jsem Pascalem jen lehce seznámený a tak vůbec netuším jak na to.

Znění:

Vytvoř a odlaď program, který přečte 2 časové údaje ve tvaru hhmmss a vytiskne kolik hodin, minut a sekund uplynulo mezi těmito časy. Budou-li zadána čísla 123456 (tj. 12 h 34 min 56 s) a 132155 (13 h 21 min 55 s), má program vytisknout něco jako:
Od 12:34:56 do 13:21:55 uplynul cas 0:46:59.

Děkuji mockrát za každou radu a pomoc.

V podstatě nic extrémně obtížného, s datumem by to bylo mnohem horší. Potřebuješ:

1) Rozdělit si zadané hodnoty (předpokládám, že budou zadané jako text, čili typ String) na tři dvojčíslí. Na to existuje funkce Copy.

2) Jednotlivá dvojčíslí převést z lidsky čitelného textu na počítačem pochopitelná čísla. Na to je procedura Val.

3) Tyhle cifry nemůžeš rovnou odčítat, to by vyšly blbosti (např. 01:00:00-00:59:00=01:-59:00 místo 00:01:00). Nejdřív z nich musíš udělat jedno číslo, třeba převodem hodin a minut na společný jmenovatel (sekundy) a sečtením.

4) Výsledná dvě čísla stačí navzájem odečíst a máš celkový rozdíl v sekundách.

5) Výsledek musíš převést zpátky do šedesátkové soustavy, to uděláš pomocí operátorů Div (celočíselné dělení) a Mod (zbytek po dělení).

6) Výsledná tři čísla vypíšeš buď rovnou (write nebo writeln), nebo je nejdřív upravíš na dvojciferný tvar s nulou na začátku (procedura Str pro převod čísla na text, funkce Length na zjištění délky a případně připojení znaku '0' zleva).

Potíže by mohly začít okolo půlnoci (přetečení z 23:59:59 na 0:00:00), ale pro začátek to nebudeme komplikovat.