#include <stdio.h>
 
int main(void)
{
int i, j;
long dec;  /* ให้รับค่าอินพุทแบบ Long Integer - เลขจำนวนเต็มแบบยาว */
int bit[32];  /* จองพื้นที่ในการเก็บข้อมูลเลขฐาน 2 ลงใน Array */
 
    clrscr();  /* เคลียร์หน้าจอ */
    printf("Decimal Number : ");  /* แจ้งผู้ใช้เพื่อเตรียมป้อนค่าเลขฐาน 10 */
    scanf("%ld", &dec);  /* ต้องใช้ ld เพราะ Input มันเป็นแบบ Long Integer */
    i = 0;  /* กำหนดค่าเริ่มต้นของ Array */
    /* ทำตามที่ได้ออกแบบโปรแกรมเอาไว้ ... ยังไงยังงั้นเลย 55555+ */
    do {
        bit[i++] = dec % 2;  /* การหารเอาเศษ เพื่อให้เป็นคำตอบ */
 
        /* การหารทั่วไป แต่ตัวแปร dec ของภาษา C มันเป็น Integer หรือ เลขจำนวนเต็ม */
        /* ดังนั้นมันจึงตัดเศษ (หรือทศนิยม) ทิ้งไปโดยอัตโนมัติ */
        dec = dec / 2;
 
    } while (dec > 0);  /* เงื่อนไขที่ทำจนกระทั่ง dec = 0 ก็ออกจากวังวนเงื่อนไข */
 
    /* การแสดงผลของการแปลงเลขฐาน 10 เป็นเลขฐาน 2*/
    /* j = i - 1 และให้ j ลดค่าลงทีละ 1 ... ก็คืออ่านข้อมูลถอยหลังกลับเท่านั้นเองครับ */
    /* เพราะตัวแปรแบบ Array ในภาษา C มันเก็บข้อมูลจากซ้ายไปขวา */
    /* ทำให้ LSB มันไปอยู่ทางซ้าย ส่วน MSB มันไปอยู่ทางขวา */
    for(j = i - 1; j >= 0; j--)
        printf("%d", bit[j]);
 
printf("\n");
return 0;
 
}

CiNpbmNsdWRlIDxzdGRpby5oPgoKaW50IG1haW4odm9pZCkKewppbnQgaSwgajsKbG9uZyBkZWM7ICAvKiDguYPguKvguYnguKPguLHguJrguITguYjguLLguK3guLTguJnguJ7guLjguJfguYHguJrguJogTG9uZyBJbnRlZ2VyIC0g4LmA4Lil4LiC4LiI4Liz4LiZ4Lin4LiZ4LmA4LiV4LmH4Lih4LmB4Lia4Lia4Lii4Liy4LinICovCmludCBiaXRbMzJdOyAgLyog4LiI4Lit4LiH4Lie4Li34LmJ4LiZ4LiX4Li14LmI4LmD4LiZ4LiB4Liy4Lij4LmA4LiB4LmH4Lia4LiC4LmJ4Lit4Lih4Li54Lil4LmA4Lil4LiC4LiQ4Liy4LiZIDIg4Lil4LiH4LmD4LiZIEFycmF5ICovCgogICAgY2xyc2NyKCk7ICAvKiDguYDguITguKXguLXguKLguKPguYzguKvguJnguYnguLLguIjguK0gKi8KICAgIHByaW50ZigiRGVjaW1hbCBOdW1iZXIgOiAiKTsgIC8qIOC5geC4iOC5ieC4h+C4nOC4ueC5ieC5g+C4iuC5ieC5gOC4nuC4t+C5iOC4reC5gOC4leC4o+C4teC4ouC4oeC4m+C5ieC4reC4meC4hOC5iOC4suC5gOC4peC4guC4kOC4suC4mSAxMCAqLwogICAgc2NhbmYoIiVsZCIsICZkZWMpOyAgLyog4LiV4LmJ4Lit4LiH4LmD4LiK4LmJIGxkIOC5gOC4nuC4o+C4suC4sCBJbnB1dCDguKHguLHguJnguYDguJvguYfguJnguYHguJrguJogTG9uZyBJbnRlZ2VyICovCiAgICBpID0gMDsgIC8qIOC4geC4s+C4q+C4meC4lOC4hOC5iOC4suC5gOC4o+C4tOC5iOC4oeC4leC5ieC4meC4guC4reC4hyBBcnJheSAqLwogICAgLyog4LiX4Liz4LiV4Liy4Lih4LiX4Li14LmI4LmE4LiU4LmJ4Lit4Lit4LiB4LmB4Lia4Lia4LmC4Lib4Lij4LmB4LiB4Lij4Lih4LmA4Lit4Liy4LmE4Lin4LmJIC4uLiDguKLguLHguIfguYTguIfguKLguLHguIfguIfguLHguYnguJnguYDguKXguKIgNTU1NTUrICovCiAgICBkbyB7CiAgICAgICAgYml0W2krK10gPSBkZWMgJSAyOyAgLyog4LiB4Liy4Lij4Lir4Liy4Lij4LmA4Lit4Liy4LmA4Lio4LipIOC5gOC4nuC4t+C5iOC4reC5g+C4q+C5ieC5gOC4m+C5h+C4meC4hOC4s+C4leC4reC4miAqLwoKICAgICAgICAvKiDguIHguLLguKPguKvguLLguKPguJfguLHguYjguKfguYTguJsg4LmB4LiV4LmI4LiV4Lix4Lin4LmB4Lib4LijIGRlYyDguILguK3guIfguKDguLLguKnguLIgQyDguKHguLHguJnguYDguJvguYfguJkgSW50ZWdlciDguKvguKPguLfguK0g4LmA4Lil4LiC4LiI4Liz4LiZ4Lin4LiZ4LmA4LiV4LmH4LihICovCiAgICAgICAgLyog4LiU4Lix4LiH4LiZ4Lix4LmJ4LiZ4Lih4Lix4LiZ4LiI4Li24LiH4LiV4Lix4LiU4LmA4Lio4LipICjguKvguKPguLfguK3guJfguKjguJnguLTguKLguKEpIOC4l+C4tOC5ieC4h+C5hOC4m+C5guC4lOC4ouC4reC4seC4leC5guC4meC4oeC4seC4leC4tCAqLwogICAgICAgIGRlYyA9IGRlYyAvIDI7CgogICAgfSB3aGlsZSAoZGVjID4gMCk7ICAvKiDguYDguIfguLfguYjguK3guJnguYTguILguJfguLXguYjguJfguLPguIjguJnguIHguKPguLDguJfguLHguYjguIcgZGVjID0gMCDguIHguYfguK3guK3guIHguIjguLLguIHguKfguLHguIfguKfguJnguYDguIfguLfguYjguK3guJnguYTguIIgKi8KCiAgICAvKiDguIHguLLguKPguYHguKrguJTguIfguJzguKXguILguK3guIfguIHguLLguKPguYHguJvguKXguIfguYDguKXguILguJDguLLguJkgMTAg4LmA4Lib4LmH4LiZ4LmA4Lil4LiC4LiQ4Liy4LiZIDIqLwogICAgLyogaiA9IGkgLSAxIOC5geC4peC4sOC5g+C4q+C5iSBqIOC4peC4lOC4hOC5iOC4suC4peC4h+C4l+C4teC4peC4sCAxIC4uLiDguIHguYfguITguLfguK3guK3guYjguLLguJnguILguYnguK3guKHguLnguKXguJbguK3guKLguKvguKXguLHguIfguIHguKXguLHguJrguYDguJfguYjguLLguJnguLHguYnguJnguYDguK3guIfguITguKPguLHguJogKi8KICAgIC8qIOC5gOC4nuC4o+C4suC4sOC4leC4seC4p+C5geC4m+C4o+C5geC4muC4miBBcnJheSDguYPguJnguKDguLLguKnguLIgQyDguKHguLHguJnguYDguIHguYfguJrguILguYnguK3guKHguLnguKXguIjguLLguIHguIvguYnguLLguKLguYTguJvguILguKfguLIgKi8KICAgIC8qIOC4l+C4s+C5g+C4q+C5iSBMU0Ig4Lih4Lix4LiZ4LmE4Lib4Lit4Lii4Li54LmI4LiX4Liy4LiH4LiL4LmJ4Liy4LiiIOC4quC5iOC4p+C4mSBNU0Ig4Lih4Lix4LiZ4LmE4Lib4Lit4Lii4Li54LmI4LiX4Liy4LiH4LiC4Lin4LiyICovCiAgICBmb3IoaiA9IGkgLSAxOyBqID49IDA7IGotLSkKICAgICAgICBwcmludGYoIiVkIiwgYml0W2pdKTsKCnByaW50ZigiXG4iKTsKcmV0dXJuIDA7Cgp9

ZnJvbSBvcGVucHl4bCBpbXBvcnQgV29ya2Jvb2sKCiMg4Liq4Lij4LmJ4Liy4LiH4LiV4Liy4Lij4Liy4LiH4Lit4Liy4Lir4Liy4Lij4LmA4Lib4LmH4LiZ4Lij4Liy4Lii4Lin4Lix4LiZCm1lYWxfcGxhbiA9IHsKICAgICZxdW90O+C4p+C4seC4meC4iOC4seC4meC4l+C4o+C5jCZxdW90OzogWwogICAgICAgICgmcXVvdDvguYDguIrguYnguLImcXVvdDssICZxdW90O+C5hOC4guC5iOC4leC5ieC4oSAzIOC4n+C4reC4hyArIOC4guC5ieC4suC4p+C4geC4peC5ieC4reC4hyAxIOC4l+C4seC4nuC4nuC4tSArIOC4geC4peC5ieC4p+C4ouC4q+C4reC4oSAxIOC4peC4ueC4gSZxdW90OyksCiAgICAgICAgKCZxdW90O+C4p+C5iOC4suC4h+C5gOC4iuC5ieC4siZxdW90OywgJnF1b3Q74LmA4Lin4Lii4LmM4LmC4Lib4Lij4LiV4Li14LiZIDEg4Liq4LiB4Li54LmK4LibICsg4LiW4Lix4LmI4Lin4Lit4Lix4Lil4Lih4Lit4LiZ4LiU4LmMIDEwIOC5gOC4oeC5h+C4lCZxdW90OyksCiAgICAgICAgKCZxdW90O+C4geC4peC4suC4h+C4p+C4seC4mSZxdW90OywgJnF1b3Q74LiC4LmJ4Liy4Lin4LiB4Lil4LmJ4Lit4LiHIDEuNSDguJfguLHguJ7guJ7guLUgKyDguK3guIHguYTguIHguYggMTUwIOC4geC4o+C4seC4oSArIOC4nOC4seC4geC4peC4p+C4gSZxdW90OyksCiAgICAgICAgKCZxdW90O+C4p+C5iOC4suC4h+C4muC5iOC4suC4oiZxdW90OywgJnF1b3Q74LmC4Lii4LmA4LiB4Li04Lij4LmM4LiV4LmE4LiC4Lih4Lix4LiZ4LiV4LmI4LizICsg4LmB4Lit4Lib4LmA4Lib4Li04LmJ4LilIDEg4Lil4Li54LiBJnF1b3Q7KSwKICAgICAgICAoJnF1b3Q74LmA4Lii4LmH4LiZJnF1b3Q7LCAmcXVvdDvguK3guIHguYTguIHguYjguKLguYjguLLguIcgMTUwIOC4geC4o+C4seC4oSArIOC4oeC4seC4meC4oeC5iOC4p+C4hyAxIOC4q+C4seC4pyArIOC4nOC4seC4geC4peC4p+C4gSZxdW90OyksCiAgICAgICAgKCZxdW90O+C4geC5iOC4reC4meC4meC4reC4mSZxdW90OywgJnF1b3Q74LmA4Lin4Lii4LmM4LmC4Lib4Lij4LiV4Li14LiZIDEg4Liq4LiB4Li54LmK4LibIOC4q+C4o+C4t+C4rSDguYTguILguYjguJXguYnguKEgMSDguJ/guK3guIcmcXVvdDspCiAgICBdLAogICAgJnF1b3Q74Lin4Lix4LiZ4Lit4Lix4LiH4LiE4Liy4LijJnF1b3Q7OiBbCiAgICAgICAgKCZxdW90O+C5gOC4iuC5ieC4siZxdW90OywgJnF1b3Q74LmE4LiC4LmI4Lil4Lin4LiBIDIg4Lif4Lit4LiHICsg4LiC4LmJ4Liy4Lin4LmC4Lit4LmK4LiVICsg4LiB4Lil4LmJ4Lin4Lii4Lir4Lit4LihIDEg4Lil4Li54LiBJnF1b3Q7KSwKICAgICAgICAoJnF1b3Q74Lin4LmI4Liy4LiH4LmA4LiK4LmJ4LiyJnF1b3Q7LCAmcXVvdDvguYDguKfguKLguYzguYLguJvguKPguJXguLXguJkgMSDguKrguIHguLnguYrguJsgKyDguJbguLHguYjguKfguK3guLHguKXguKHguK3guJnguJTguYwgMTAg4LmA4Lih4LmH4LiUJnF1b3Q7KSwKICAgICAgICAoJnF1b3Q74LiB4Lil4Liy4LiH4Lin4Lix4LiZJnF1b3Q7LCAmcXVvdDvguILguYnguLLguKfguIHguKXguYnguK3guIcgMS41IOC4l+C4seC4nuC4nuC4tSArIOC4m+C4peC4suC4ouC5iOC4suC4hyAxNTAg4LiB4Lij4Lix4LihICsg4Lic4Lix4LiB4Lil4Lin4LiBJnF1b3Q7KSwKICAgICAgICAoJnF1b3Q74Lin4LmI4Liy4LiH4Lia4LmI4Liy4LiiJnF1b3Q7LCAmcXVvdDvguYLguKLguYDguIHguLTguKPguYzguJXguYTguILguKHguLHguJnguJXguYjguLMgKyDguYHguIHguYnguKfguKHguLHguIfguIHguKMmcXVvdDspLAogICAgICAgICgmcXVvdDvguYDguKLguYfguJkmcXVvdDssICZxdW90O+C4m+C4peC4suC4meC4tuC5iOC4hyAxNTAg4LiB4Lij4Lix4LihICsg4LiC4LmJ4Liy4Lin4LmC4Lie4LiU4LiV4LmJ4LihICsg4Lic4Lix4LiBJnF1b3Q7KSwKICAgICAgICAoJnF1b3Q74LiB4LmI4Lit4LiZ4LiZ4Lit4LiZJnF1b3Q7LCAmcXVvdDvguYDguKfguKLguYzguYLguJvguKPguJXguLXguJkg4Lir4Lij4Li34LitIOC5hOC4guC5iOC4leC5ieC4oSZxdW90OykKICAgIF0sCiAgICAmcXVvdDvguKfguLHguJnguJ7guLjguJgmcXVvdDs6IFsKICAgICAgICAoJnF1b3Q74LmA4LiK4LmJ4LiyJnF1b3Q7LCAmcXVvdDvguYTguILguYjguJXguYnguKEgMyDguJ/guK3guIcgKyDguILguYnguLLguKfguIHguKXguYnguK3guIcgMSDguJfguLHguJ7guJ7guLUmcXVvdDspLAogICAgICAgICgmcXVvdDvguKfguYjguLLguIfguYDguIrguYnguLImcXVvdDssICZxdW90O+C5gOC4p+C4ouC5jOC5guC4m+C4o+C4leC4teC4mSArIOC4luC4seC5iOC4p+C4reC4seC4peC4oeC4reC4meC4lOC5jCZxdW90OyksCiAgICAgICAgKCZxdW90O+C4geC4peC4suC4h+C4p+C4seC4mSZxdW90OywgJnF1b3Q74LiC4LmJ4Liy4Lin4LiB4Lil4LmJ4Lit4LiHICsg4Lit4LiB4LmE4LiB4LmIICsg4Lic4Lix4LiBJnF1b3Q7KSwKICAgICAgICAoJnF1b3Q74Lin4LmI4Liy4LiH4Lia4LmI4Liy4LiiJnF1b3Q7LCAmcXVvdDvguYLguKLguYDguIHguLTguKPguYzguJUgKyDguKrguYnguKEmcXVvdDspLAogICAgICAgICgmcXVvdDvguYDguKLguYfguJkmcXVvdDssICZxdW90O+C5hOC4guC5iOC4leC5ieC4oSAyIOC4n+C4reC4hyArIOC4m+C4peC4suC4ouC5iOC4suC4hyArIOC4nOC4seC4gSZxdW90OyksCiAgICAgICAgKCZxdW90O+C4geC5iOC4reC4meC4meC4reC4mSZxdW90OywgJnF1b3Q74LmA4Lin4Lii4LmM4LmC4Lib4Lij4LiV4Li14LiZIOC4q+C4o+C4t+C4rSDguYTguILguYjguJXguYnguKEmcXVvdDspCiAgICBdLAogICAgJnF1b3Q74Lin4Lix4LiZ4Lie4Lik4Lir4Lix4Liq4Lia4LiU4Li1JnF1b3Q7OiBbCiAgICAgICAgKCZxdW90O+C5gOC4iuC5ieC4siZxdW90OywgJnF1b3Q74LmE4LiC4LmI4Lil4Lin4LiBICsg4LiC4LmJ4Liy4Lin4LmC4Lit4LmK4LiVICsg4LiB4Lil4LmJ4Lin4LiiJnF1b3Q7KSwKICAgICAgICAoJnF1b3Q74Lin4LmI4Liy4LiH4LmA4LiK4LmJ4LiyJnF1b3Q7LCAmcXVvdDvguYDguKfguKLguYzguYLguJvguKPguJXguLXguJkgKyDguJbguLHguYjguKcmcXVvdDspLAogICAgICAgICgmcXVvdDvguIHguKXguLLguIfguKfguLHguJkmcXVvdDssICZxdW90O+C4guC5ieC4suC4p+C4geC4peC5ieC4reC4hyArIOC4m+C4peC4suC4meC4tuC5iOC4hyArIOC4nOC4seC4gSZxdW90OyksCiAgICAgICAgKCZxdW90O+C4p+C5iOC4suC4h+C4muC5iOC4suC4oiZxdW90OywgJnF1b3Q74LmC4Lii4LmA4LiB4Li04Lij4LmM4LiVICsg4LmB4Lit4Lib4LmA4Lib4Li04LmJ4LilJnF1b3Q7KSwKICAgICAgICAoJnF1b3Q74LmA4Lii4LmH4LiZJnF1b3Q7LCAmcXVvdDvguK3guIHguYTguIHguYjguKLguYjguLLguIcgKyDguKHguLHguJnguKHguYjguKfguIcgKyDguJzguLHguIEmcXVvdDspLAogICAgICAgICgmcXVvdDvguIHguYjguK3guJnguJnguK3guJkmcXVvdDssICZxdW90O+C5gOC4p+C4ouC5jOC5guC4m+C4o+C4leC4teC4mSDguKvguKPguLfguK0g4LmE4LiC4LmI4LiV4LmJ4LihJnF1b3Q7KQogICAgXSwKICAgICZxdW90O+C4p+C4seC4meC4qOC4uOC4geC4o+C5jCZxdW90OzogWwogICAgICAgICgmcXVvdDvguYDguIrguYnguLImcXVvdDssICZxdW90O+C5hOC4guC5iOC4leC5ieC4oSArIOC4guC5ieC4suC4p+C4geC4peC5ieC4reC4hyArIOC4geC4peC5ieC4p+C4oiZxdW90OyksCiAgICAgICAgKCZxdW90O+C4p+C5iOC4suC4h+C5gOC4iuC5ieC4siZxdW90OywgJnF1b3Q74LmA4Lin4Lii4LmM4LmC4Lib4Lij4LiV4Li14LiZICsg4LiW4Lix4LmI4LinJnF1b3Q7KSwKICAgICAgICAoJnF1b3Q74LiB4Lil4Liy4LiH4Lin4Lix4LiZJnF1b3Q7LCAmcXVvdDvguILguYnguLLguKfguIHguKXguYnguK3guIcgKyDguK3guIHguYTguIHguYggKyDguJzguLHguIEmcXVvdDspLAogICAgICAgICgmcXVvdDvguKfguYjguLLguIfguJrguYjguLLguKImcXVvdDssICZxdW90O+C5guC4ouC5gOC4geC4tOC4o+C5jOC4lSArIOC4nOC4peC5hOC4oeC5iSZxdW90OyksCiAgICAgICAgKCZxdW90O+C5gOC4ouC5h+C4mSZxdW90OywgJnF1b3Q74Lib4Lil4Liy4Lii4LmI4Liy4LiHICsg4LiC4LmJ4Liy4Lin4LmC4Lie4LiUICsg4Lic4Lix4LiBJnF1b3Q7KSwKICAgICAgICAoJnF1b3Q74LiB4LmI4Lit4LiZ4LiZ4Lit4LiZJnF1b3Q7LCAmcXVvdDvguYDguKfguKLguYzguYLguJvguKPguJXguLXguJkg4Lir4Lij4Li34LitIOC5hOC4guC5iOC4leC5ieC4oSZxdW90OykKICAgIF0sCiAgICAmcXVvdDvguKfguLHguJnguYDguKrguLLguKPguYwmcXVvdDs6IFsKICAgICAgICAoJnF1b3Q74LmA4LiK4LmJ4LiyJnF1b3Q7LCAmcXVvdDvguYTguILguYjguKXguKfguIEgKyDguILguYnguLLguKfguYLguK3guYrguJUgKyDguIHguKXguYnguKfguKImcXVvdDspLAogICAgICAgICgmcXVvdDvguKfguYjguLLguIfguYDguIrguYnguLImcXVvdDssICZxdW90O+C5gOC4p+C4ouC5jOC5guC4m+C4o+C4leC4teC4mSArIOC4luC4seC5iOC4pyZxdW90OyksCiAgICAgICAgKCZxdW90O+C4geC4peC4suC4h+C4p+C4seC4mSZxdW90OywgJnF1b3Q74LiC4LmJ4Liy4Lin4LiB4Lil4LmJ4Lit4LiHICsg4Lit4LiB4LmE4LiB4LmIICsg4Lic4Lix4LiBJnF1b3Q7KSwKICAgICAgICAoJnF1b3Q74Lin4LmI4Liy4LiH4Lia4LmI4Liy4LiiJnF1b3Q7LCAmcXVvdDvguYLguKLguYDguIHguLTguKPguYzguJUgKyDguYHguK3guJvguYDguJvguLTguYnguKUmcXVvdDspLAogICAgICAgICgmcXVvdDvguYDguKLguYfguJkmcXVvdDssICZxdW90O+C4reC4geC5hOC4geC5iOC4ouC5iOC4suC4hyArIOC4oeC4seC4meC4oeC5iOC4p+C4hyArIOC4nOC4seC4gSZxdW90OyksCiAgICAgICAgKCZxdW90O+C4geC5iOC4reC4meC4meC4reC4mSZxdW90OywgJnF1b3Q74LmA4Lin4Lii4LmM4LmC4Lib4Lij4LiV4Li14LiZIOC4q+C4o+C4t+C4rSDguYTguILguYjguJXguYnguKEmcXVvdDspCiAgICBdLAogICAgJnF1b3Q74Lin4Lix4LiZ4Lit4Liy4LiX4Li04LiV4Lii4LmMJnF1b3Q7OiBbCiAgICAgICAgKCZxdW90O+C5gOC4iuC5ieC4siZxdW90OywgJnF1b3Q74LmE4LiC4LmI4LiV4LmJ4LihIDIg4Lif4Lit4LiHICsg4LiC4LmJ4Liy4Lin4LiB4Lil4LmJ4Lit4LiHICsg4LiB4Lil4LmJ4Lin4LiiJnF1b3Q7KSwKICAgICAgICAoJnF1b3Q74Lin4LmI4Liy4LiH4LmA4LiK4LmJ4LiyJnF1b3Q7LCAmcXVvdDvguYDguKfguKLguYzguYLguJvguKPguJXguLXguJkgKyDguJbguLHguYjguKcmcXVvdDspLAogICAgICAgICgmcXVvdDvguIHguKXguLLguIfguKfguLHguJkmcXVvdDssICZxdW90O+C4guC5ieC4suC4p+C4geC4peC5ieC4reC4hyArIOC4m+C4peC4suC4meC4tuC5iOC4hyArIOC4nOC4seC4gSZxdW90OyksCiAgICAgICAgKCZxdW90O+C4p+C5iOC4suC4h+C4muC5iOC4suC4oiZxdW90OywgJnF1b3Q74LmC4Lii4LmA4LiB4Li04Lij4LmM4LiVICsg4Lic4Lil4LmE4Lih4LmJJnF1b3Q7KSwKICAgICAgICAoJnF1b3Q74LmA4Lii4LmH4LiZJnF1b3Q7LCAmcXVvdDvguYTguILguYjguJXguYnguKEgKyDguJvguKXguLLguKLguYjguLLguIcgKyDguJzguLHguIEmcXVvdDspLAogICAgICAgICgmcXVvdDvguIHguYjguK3guJnguJnguK3guJkmcXVvdDssICZxdW90O+C5gOC4p+C4ouC5jOC5guC4m+C4o+C4leC4teC4mSDguKvguKPguLfguK0g4LmE4LiC4LmI4LiV4LmJ4LihJnF1b3Q7KQogICAgXQp9CgojIOC4quC4o+C5ieC4suC4h+C5hOC4n+C4peC5jCBFeGNlbAp3YiA9IFdvcmtib29rKCkKd3MgPSB3Yi5hY3RpdmUKd3MudGl0bGUgPSAmcXVvdDtNZWFsIFBsYW4mcXVvdDsKCiMg4Liq4Lij4LmJ4Liy4LiH4Lir4Lix4Lin4LiV4Liy4Lij4Liy4LiHCndzLmFwcGVuZChbJnF1b3Q74Lin4Lix4LiZJnF1b3Q7LCAmcXVvdDvguKHguLfguYnguK0mcXVvdDssICZxdW90O+C4o+C4suC4ouC4geC4suC4o+C4reC4suC4q+C4suC4oyZxdW90O10pCgojIOC5gOC4leC4tOC4oeC4guC5ieC4reC4oeC4ueC4pQpmb3IgZGF5LCBtZWFscyBpbiBtZWFsX3BsYW4uaXRlbXMoKToKICAgIGZvciBtZWFsIGluIG1lYWxzOgogICAgICAgIHdzLmFwcGVuZChbZGF5LCBtZWFsWzBdLCBtZWFsWzFdXSkKCiMg4Lia4Lix4LiZ4LiX4Li24LiB4LmE4Lif4Lil4LmMCndiLnNhdmUoJnF1b3Q7bWVhbF9wbGFuXzNtb250aHMueGxzeCZxdW90Oyk=

from openpyxl import Workbook

# สร้างตารางอาหารเป็นรายวัน
meal_plan = {
    "วันจันทร์": [
        ("เช้า", "ไข่ต้ม 3 ฟอง + ข้าวกล้อง 1 ทัพพี + กล้วยหอม 1 ลูก"),
        ("ว่างเช้า", "เวย์โปรตีน 1 สกู๊ป + ถั่วอัลมอนด์ 10 เม็ด"),
        ("กลางวัน", "ข้าวกล้อง 1.5 ทัพพี + อกไก่ 150 กรัม + ผักลวก"),
        ("ว่างบ่าย", "โยเกิร์ตไขมันต่ำ + แอปเปิ้ล 1 ลูก"),
        ("เย็น", "อกไก่ย่าง 150 กรัม + มันม่วง 1 หัว + ผักลวก"),
        ("ก่อนนอน", "เวย์โปรตีน 1 สกู๊ป หรือ ไข่ต้ม 1 ฟอง")
    ],
    "วันอังคาร": [
        ("เช้า", "ไข่ลวก 2 ฟอง + ข้าวโอ๊ต + กล้วยหอม 1 ลูก"),
        ("ว่างเช้า", "เวย์โปรตีน 1 สกู๊ป + ถั่วอัลมอนด์ 10 เม็ด"),
        ("กลางวัน", "ข้าวกล้อง 1.5 ทัพพี + ปลาย่าง 150 กรัม + ผักลวก"),
        ("ว่างบ่าย", "โยเกิร์ตไขมันต่ำ + แก้วมังกร"),
        ("เย็น", "ปลานึ่ง 150 กรัม + ข้าวโพดต้ม + ผัก"),
        ("ก่อนนอน", "เวย์โปรตีน หรือ ไข่ต้ม")
    ],
    "วันพุธ": [
        ("เช้า", "ไข่ต้ม 3 ฟอง + ข้าวกล้อง 1 ทัพพี"),
        ("ว่างเช้า", "เวย์โปรตีน + ถั่วอัลมอนด์"),
        ("กลางวัน", "ข้าวกล้อง + อกไก่ + ผัก"),
        ("ว่างบ่าย", "โยเกิร์ต + ส้ม"),
        ("เย็น", "ไข่ต้ม 2 ฟอง + ปลาย่าง + ผัก"),
        ("ก่อนนอน", "เวย์โปรตีน หรือ ไข่ต้ม")
    ],
    "วันพฤหัสบดี": [
        ("เช้า", "ไข่ลวก + ข้าวโอ๊ต + กล้วย"),
        ("ว่างเช้า", "เวย์โปรตีน + ถั่ว"),
        ("กลางวัน", "ข้าวกล้อง + ปลานึ่ง + ผัก"),
        ("ว่างบ่าย", "โยเกิร์ต + แอปเปิ้ล"),
        ("เย็น", "อกไก่ย่าง + มันม่วง + ผัก"),
        ("ก่อนนอน", "เวย์โปรตีน หรือ ไข่ต้ม")
    ],
    "วันศุกร์": [
        ("เช้า", "ไข่ต้ม + ข้าวกล้อง + กล้วย"),
        ("ว่างเช้า", "เวย์โปรตีน + ถั่ว"),
        ("กลางวัน", "ข้าวกล้อง + อกไก่ + ผัก"),
        ("ว่างบ่าย", "โยเกิร์ต + ผลไม้"),
        ("เย็น", "ปลาย่าง + ข้าวโพด + ผัก"),
        ("ก่อนนอน", "เวย์โปรตีน หรือ ไข่ต้ม")
    ],
    "วันเสาร์": [
        ("เช้า", "ไข่ลวก + ข้าวโอ๊ต + กล้วย"),
        ("ว่างเช้า", "เวย์โปรตีน + ถั่ว"),
        ("กลางวัน", "ข้าวกล้อง + อกไก่ + ผัก"),
        ("ว่างบ่าย", "โยเกิร์ต + แอปเปิ้ล"),
        ("เย็น", "อกไก่ย่าง + มันม่วง + ผัก"),
        ("ก่อนนอน", "เวย์โปรตีน หรือ ไข่ต้ม")
    ],
    "วันอาทิตย์": [
        ("เช้า", "ไข่ต้ม 2 ฟอง + ข้าวกล้อง + กล้วย"),
        ("ว่างเช้า", "เวย์โปรตีน + ถั่ว"),
        ("กลางวัน", "ข้าวกล้อง + ปลานึ่ง + ผัก"),
        ("ว่างบ่าย", "โยเกิร์ต + ผลไม้"),
        ("เย็น", "ไข่ต้ม + ปลาย่าง + ผัก"),
        ("ก่อนนอน", "เวย์โปรตีน หรือ ไข่ต้ม")
    ]
}

# สร้างไฟล์ Excel
wb = Workbook()
ws = wb.active
ws.title = "Meal Plan"

# สร้างหัวตาราง
ws.append(["วัน", "มื้อ", "รายการอาหาร"])

# เติมข้อมูล
for day, meals in meal_plan.items():
    for meal in meals:
        ws.append([day, meal[0], meal[1]])

# บันทึกไฟล์
wb.save("meal_plan_3months.xlsx")