ข่าว IT ล่าสุด
ถูกใจอย่าลืม Like Fanpage
ช่วยเติมให้สมบูรณ์หน่อยครับ
แสดงแล้ว 4166 ครั้ง /
มกราคม 22, 2010, 13:05:37

gowit

ออฟไลน์
กระทู้ : 5
คะแนนขอบคุณ : 0
program while_test
uses crt;
var
     n, sum :integer;
begin
     clrscr();
     n := 0;
     ...........;
     while n >=0 do //Exit while loop when N is negative
begin
         write (' please input N: ');
         read(in);
         ............;
         end;
         ............;
         writeln (' Bye Bye !!! ');
end.


ßë©äûšë

ออฟไลน์ ( แค่นี้ยังอ่อนหัดอยู่นะ )
กระทู้ : 1,534
คะแนนขอบคุณ : 13
เลขเด็ด เลขเด็ด เลขดัง เกร็งเลข ใบ้หวย ประจำงวดนี้ ที่นี่ อาจารย์ตี๋
มกราคม 22, 2010, 13:16:49
รอเร็ปล่างละกันนะครับ :P

Moshi

ออฟไลน์
กระทู้ : 16,996
คะแนนขอบคุณ : 45
it4x สังคมแห่งการเรียนรู้
มกราคม 22, 2010, 14:13:42
program while_test;
uses crt;
var n, sum :integer;
begin
     clrscr;
     n := 0;
     writeln('...........');
     while n >=0 do //Exit while loop when N is negative
         begin
         write (' please input N: ');
         read(n);
         writeln('...........');
         end;
         writeln('...........');
         writeln (' Bye Bye !!! ');
end.

ßë©äûšë

ออฟไลน์ ( แค่นี้ยังอ่อนหัดอยู่นะ )
กระทู้ : 1,534
คะแนนขอบคุณ : 13
เลขเด็ด เลขเด็ด เลขดัง เกร็งเลข ใบ้หวย ประจำงวดนี้ ที่นี่ อาจารย์ตี๋
มกราคม 22, 2010, 15:04:29
หุหุ

 

ด้วยฟังค์ชั่น ตอบด่วน คุณสามารถใช้โค๊ดและ เครื่องหมายแสดงอารมณ์ได้ เหมือนการตั้งกระทู้ธรรมดา แต่สามารถทำได้สะดวกกว่า

ระวัง: หัวข้อนี้ไม่มีการอัพเดทมานานถึง 120 วัน

แจ้งเตือน: โพสของคุณจะไม่แสดงจนกว่าผู้ดูแลจะอนุมัติ.
ชื่อ: อีเมล์: