[pascal] Ilość setek, dziesiątek i jedności

Witam, mam problem z pewnym zadaniem, jedyne co mi podpowiedział nauczyciel to to, że trzeba użyć jakiegoś operatora "div" czy tam "mod". Próbowałem i nic mi nie idzie. Mianowicie zadanie brzmi tak:

Napisz program, który wczytuje pewna liczbe całkowita i podaje, ile wynosi liczba:
setek, dziesiatek, jednosci.

Czyli np. odpowiedz dla liczby 638 ma wyglądać np. : 6 setek, 3 dziesiątki, 8 jedności.

Będę bardzo wdzięczny za pomoc, męcze się już pare dni :/

jedyne co mi podpowiedział nauczyciel to to, że trzeba użyć jakiegoś operatora "div" czy tam "mod". Próbowałem i nic mi nie idzie.

czyli rozumiem, ze probowales, ale nie wiesz do czego sluza te operatory tak??

twoim obowiazkiem byloby sie dowiedziec..

div - dzielenie calkowite (bez reszty)
mod - reszta z dzielenia

napisze Ci w pseudokodzie, zebys przynjamniej choc cos sam zrobil

nie napisales jakiego formatu to beda liczby, i w w jakiej kolejnosci ma to byc wyswietlane, dla tego przykladu co podales mozna to zrobci w ten sposob:

krok 1. liczbe 638 dzielisz (div) przez 100 - otrzymujesz liczbe setek (6)
krok 2. nastepnie z tej samej liczby obliczasz reszte z dzielenia (100) przez 100 - otryzmujesz reszte (38)
krok 3. nastepnie wracasz do kroku 1 i dzielisz tym razem liczbe przez 10 - otryzmujesz liczbe dziesiatek (3)
krok 4. i potem znow reszta z dzielenia przez 10 - otrzymujesz 8
krok 5. koniec - masz juz wszystkie dane

z tego mozna ladna petelke zrobic, ale najpierw trzeba to zrozumiec..

Pętelkę... tylko, że tego jeszcze nie mieliśmy:D

Owszem próbowałem coś kombinować, cos takiego robiłem,

jednak coś nie szło, pokombinuje zaraz według twojego opisu.

to nie pozostaje Ci nic innego jak zrobic krok po kroku to co Ci napisalem..

z malym szczegolem, przeoczylem to bo dla mnie to jest proste, ale czytajac bezposrednio to co napisalem moze to nie wynikac

otoz miedzy krokiem 2 i 3 nastepuje "nadpisanie" starej wartosci przez reszte z dzielenia ( 638 >> 38 )

YEEEEEEEEEEEEEEEEEEEEEEEEEEEEE:D

Nawet przy okazji to zrozumiałem:D dziex:)



thx:)