Pascal uždavinys

Sveiki, niekaip nesuprantu šio Pascal uždavinio, gal kas turit įdėjų, ar minčių kaip galima būtų šį uždavinį išspręsti?:

Ketvirtokas žaidžia žaidimą: išsitraukia kortelę su sveikuoju skaičiumi s iš intervalo [10; 100] ir bando jį

išreikšti nelyginių skaitmenų nuo 1 iki 5 suma taip, kad dėmenys prasidėtų didžiausiu skaitmeniu ir dėmenų

skaičius būtų kuo mažesnis. Parenkite programą, kuri padėtų ketvirtokui žaisti šį žaidimą.

 

Pradinių duomenų faile Duomenys.txt įrašytas skaičius s.

 

Į rezultatų failą Rezultatai.txt surašykite, kokie skaitmenys ir kiek jų sudaro sumą s.

 

Nurodymai:

• Programoje sukurkite procedūrą , skaičiuojančią kiek ir kokių skaitmenų sudaro sumą s.

Duomenys.txt faile:

44

Dėkui už pagalbą iš anksto! :)

Paimi skaičių ir suki whikle ciklą, kol >5, tol atiminėji 5, kai mažiau - atimi 3, jei mažiau už 3 - atimi 1. Taip pat po kiekvieno sėkmingo atėmimo pridedi skaičių prie nelyiginių skaitmenų skaičiaus :)

uztenka paprastos matematikos:

penketu:= n div 5;
trejetu:= (n mod 5) div 3;
vienetu:= (n mod 5)  mod 3;