Hogyan csináljak pénzváltó programot pascallal?

Szerinted?

Osszeg * arfolyam

kiír("kérem az átváltandó összeget");

bekér ossz;

kiír: "kérem az ároflyamot"

bekér arf;

kiír("Átváltva:"+(ossz*arf));

ugye innen már boldogulsz?

Azért nem ilyen könnyű, mert ha 2 font és az árfolyam mit tudom én a fonthoz képest kisebb, akkor gázos a szorzás.

2x-42 például. Először meg kellene vizsgálnia, hogy a bekért árfolyam hogyan viszonyul a másikhoz, mert lehet hogy osztani kell.