ถ้าต้องการ ถาม หาเลขตัวสุดท้าย เฉพาะที่ลงท้ายด้วย 2 ทั้งหมด
จากค่า ที่เราใส่ไปตอนแรก ต้องทำไงครับ แบบทำนองว่า ใส่ ไป 50 มันจะขึ้น 2 12 22 32 42
🏷️ หัวข้อที่เกี่ยวข้อง
📤 แชร์บทความนี้
💬 การตอบกลับ 3
Moshi
16,996 โพสต์
— cyanide link=topic=3647.msg7822#msg7822 date=1266219741
ถ้าต้องการ ถาม หาเลขตัวสุดท้าย เฉพาะที่ลงท้ายด้วย 2 ทั้งหมด
จากค่า ที่เราใส่ไปตอนแรก ต้องทำไงครับ แบบทำนองว่า ใส่ ไป 50 มันจะขึ้น 2 12 22 32 42
ง่ายๆ เอง
ใช้ พวก while ครับ ดูจากตัวอย่างเดิมก็ได้ หรือ ใช้ for ก็ได้ครับ
แล้วลองดัดแปลงดูเอานะ
cyanide
2 โพสต์
— Moshi link=topic=3647.msg7824#msg7824 date=1266220371
[quote author=cyanide link=topic=3647.msg7822#msg7822 date=1266219741]
ถ้าต้องการ ถาม หาเลขตัวสุดท้าย เฉพาะที่ลงท้ายด้วย 2 ทั้งหมด
จากค่า ที่เราใส่ไปตอนแรก ต้องทำไงครับ แบบทำนองว่า ใส่ ไป 50 มันจะขึ้น 2 12 22 32 42
ง่ายๆ เอง
ใช้ พวก while ครับ ดูจากตัวอย่างเดิมก็ได้ หรือ ใช้ for ก็ได้ครับ
แล้วลองดัดแปลงดูเอานะ
[/quote]
ช่วยบอกเป็นแนวทางหน่อยได้มั๊ยครับ คือไม่ค่อยเข้าใจอะ คือ อ.เค้าบอกให้รับค่าตัวเลขก่อน แล้วเลขที่ ลงท้ายด้วย5 ทุกตัว ถึงที่เรารับค่าไป
ไปอะครับ
Moshi
16,996 โพสต์
program it4x;
uses crt;
var i,x,sum:integer;
begin
clrscr;
write('Input Your Number : ');readln(i);
x:=5;
clrscr;
if i>=x then
begin
repeat
writeln(x);
i:=i-10;
x:=x+10;
until i<=0;
end
else writeln('Number<5 ');
readln;
end.
ช่วยแค่นี้ละกัน ที่เหลือดัดแปลงเอา
uses crt;
var i,x,sum:integer;
begin
clrscr;
write('Input Your Number : ');readln(i);
x:=5;
clrscr;
if i>=x then
begin
repeat
writeln(x);
i:=i-10;
x:=x+10;
until i<=0;
end
else writeln('Number<5 ');
readln;
end.
ช่วยแค่นี้ละกัน ที่เหลือดัดแปลงเอา