คนเขียนโปรแกรม

ช่วยเติมให้สมบูรณ์หน่อยครับ

gowit
👁 7,910 ครั้ง · 💬 3 ตอบ
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.
🏷️ หัวข้อที่เกี่ยวข้อง
while end bye วยเต มให สมบ รณ หน อยคร program testuses crt var sum integer

💬 การตอบกลับ 3

#1
ßë©äûšë
ßë©äûšë
Teelek Programmer · 1,534 โพสต์
รอเร็ปล่างละกันนะครับ :P
#2
Moshi
Moshi
16,996 โพสต์
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.
#3
ßë©äûšë
ßë©äûšë
Teelek Programmer · 1,534 โพสต์
หุหุ