จากโจทย์นี้
การบ้าน
เขียนโปรแกรมเพื่อใช้จองห้องพักในหอพักแห่งหนึ่งที่มีจำนวน 4 ชั้น ๆ ละ 10 ห้อง
ให้รับข้อมูลจองห้องพักจนกว่าผู้ใช้จะกด N ให้แสดงผล 4 แถว ๆ ละ 10 ค่า
โดยถ้าห้องพักใดมีการจองให้แสดงค่าเป็น X ส่วนห้องที่ไม่มีการจอง ให้แสดงเป็น O ห้องที่ถูกจองแล้วให้แสดงข้อความว่า จอง
หน้าจอรับข้อมูล
Input Room 1 1
Input again [y/n]
y
Input Room 2 2
Input again [y/n]
n
หน้าจอแสดงผล
O O O O O O O O O O
O X O O O O O O O O
O O X O O O O O O O
O O O O O O O O O O
ผมไม่เข้าใจภาษา VB ว่า ผู้ใช้จะป้อนอินพุตมายังไงให้โปรแกรมรู้ว่าอาเรย์ตำแหน่งนี้นะแล้วไปกาตรงนี้
-ผมป้อนอ้างอิงอาเรย์ 2 มิติไม่ได้
- ผมจะให้x มาแทนโอได้ยังไง งงมาก
ทั้งวันได้แค่นี้ ยอมรับโจทย์นี้เลยครับ
Module Module1
Sub Main()
Dim h(3, 9) As Integer
Dim y As Char
For c As Integer = 0 To 3
For r As Integer = 0 To 9
Console.WriteLine("Input Room ")
h(c, r) = Console.ReadLine()
Console.WriteLine("Input again [y/n]")
y = Console.ReadLine()
If y = "n" Then
For cc As Integer = 0 To 3
Console.WriteLine("", h(c, r))
For rr As Integer = 0 To 9
Console.Write("o")
Next rr
Next cc
End If
Next r
Next c
End Sub
End Module
โจทย์การบ้านอาเรย์ ช่วยหน่อยครับ
การบ้าน
เขียนโปรแกรมเพื่อใช้จองห้องพักในหอพักแห่งหนึ่งที่มีจำนวน 4 ชั้น ๆ ละ 10 ห้อง
ให้รับข้อมูลจองห้องพักจนกว่าผู้ใช้จะกด N ให้แสดงผล 4 แถว ๆ ละ 10 ค่า
โดยถ้าห้องพักใดมีการจองให้แสดงค่าเป็น X ส่วนห้องที่ไม่มีการจอง ให้แสดงเป็น O ห้องที่ถูกจองแล้วให้แสดงข้อความว่า จอง
หน้าจอรับข้อมูล
Input Room 1 1
Input again [y/n]
y
Input Room 2 2
Input again [y/n]
n
หน้าจอแสดงผล
O O O O O O O O O O
O X O O O O O O O O
O O X O O O O O O O
O O O O O O O O O O
ผมไม่เข้าใจภาษา VB ว่า ผู้ใช้จะป้อนอินพุตมายังไงให้โปรแกรมรู้ว่าอาเรย์ตำแหน่งนี้นะแล้วไปกาตรงนี้
-ผมป้อนอ้างอิงอาเรย์ 2 มิติไม่ได้
- ผมจะให้x มาแทนโอได้ยังไง งงมาก
ทั้งวันได้แค่นี้ ยอมรับโจทย์นี้เลยครับ
Module Module1
Sub Main()
Dim h(3, 9) As Integer
Dim y As Char
For c As Integer = 0 To 3
For r As Integer = 0 To 9
Console.WriteLine("Input Room ")
h(c, r) = Console.ReadLine()
Console.WriteLine("Input again [y/n]")
y = Console.ReadLine()
If y = "n" Then
For cc As Integer = 0 To 3
Console.WriteLine("", h(c, r))
For rr As Integer = 0 To 9
Console.Write("o")
Next rr
Next cc
End If
Next r
Next c
End Sub
End Module