ช่วยเขียนโปรแกรมให้หน่อย คับขอแบบเต็มๆนะคับ

โปรแกรม แปลงค่า เงิน ไทย เป็น เงิน สกุลต่างๆ อะคับช่วย ทีคับ จะ ติด 0 แล้ว แล้วก็
โปรแกรมเครื่องคิดเลขด้วยคับ
โปรแกรมคำนวณ ค่าน้ำไฟด้วยคับ
ขอแบบ ละเอียด นะครับ

จะแนะนำเป็นแค่แนวทางนะครับ

เงินแปลงสกุลเงินต่างๆ
ก็ใช้ if เหมือนพวกตัดเกรด ขั้นตอนแรก แสดงเมนูก่อน ว่า 1,2,3,4 สกุลเงินอะไร แลกเปลี่ยนเป็นเงินบาทเท่าไหร่ จากนั้นก็ให้กรอกจำนวน แล้วแปลงตามเงื่อนไข นั้นๆ

เครื่องคิดเลข ก็ใช้เหมือนกันครับ รับค่าตัวเลข แล้วก็ให้ระบุเงื่อนไข ว่าให้ทำอะไร

ค่าน้ำ ค่าไฟ ก็ ให้รับจำนวนหน่วย มา * กับจำนวน หน่วย / บาท

เขียน ให้หน่อยได้ไหม คับ ผมเขียน ไม่ เป็นอะคับ

เอา ของ แปลงค่าเงิน อะคับ  ช่วยทีนะคับ

เช่น เงินไทย เป็นดอลล่า เงินไทย แปลงเป็นหยวน เงินไทย แปลงเป็น ยูโร   เขียนให้หน่อยนะครับผมไว้ ละคับ

ภาษา pascal อะคับ

แปลงค่าเงิน สกุลต่างๆ ผม ลองเขียนแล้ว RUN ไม่ได้พี่แก้ให้ผมด้วยนะคับ
program teat1;
uses Crt;
var baht,donller,euro,yen,money:integer;
begin
    Clrscr;
    writeln('inset you money=');
    writeln('1.donller');
    writeln('2.euro');
    writeln('3.yen');
    writeln;
    case money of
         '1donller':begin
                     write('baht='); readln(baht);
                     write('donller='); readln(donller);
                     money: 30*donller*baht=;
                     writeln('money donller=')
                     end;
          '2euro'  :begin
                     write('baht='); readln(baht);
                     write('euro='); readln(euro);
                     money: 50*euro*baht=;
                     writeln('money euro=')
                     end;
           '3yen'  :begin
                     write('baht='); readln(baht);
                     write('yen='); readln(yen);
                     money 40*yen*baht=;
                     end;
        readln;
End.

เดียวไว้เคลียงานเส็ดแวะมาตอบให้นะครับ

ขอบคุณ ค๊าบบบบบบบ  ผมส่งวัน จันทร์ นะค๊าบ ท่าไม่เสร็จ ผม 0แน่ เลย ค๊าบ