Cần sự giúp đỡ thực hiện các phép tính cơ bản như (+ - * :)

[HaDuyNguyen]

Tôi có một chương trình với những dòng Code như sau :

Code: [Select all] [Expand/Collapse]

1. Imports System.Console
2. Module Module1
3.  
4.     Sub Main(Argumente() As String)
5.      
6.  
7.       WriteLine()
8.         WriteLine(" Number der Argumente {0}", Argumente.Length)
9.         WriteLine()
10.         If Argumente.Length > 2 Then
11.             WriteLine(" Zuviele Argumente")
12.             Exit Sub
13.         ElseIf Argumente.Length < 2 Then
14.             WriteLine(" Zuwenig Argumente")
15.             WriteLine()
16.             Exit Sub
17.         End If
18.         WriteLine(" {0} + {1} = {2}", _
19.                     Argumente(0), Argumente(1), _
20.                     CInt(Argumente(0)) + Argumente(1))
21.         WriteLine()
22.     End Sub
23.  
24. End Module

GeSHi © Codebox Plus Extension

Yêu cầu là sửa đổi Code của chương trình để khi chạy, chương trình sẽ thực hiện các phép tính cơ bản như (+ - * :) và hiển thị ra màn hình, ví dụ như hình bên dưới:
Tôi đã chụp ảnh màn hình, nhưng không thể dán vào viết này được, mong mọi người thông cảm cho.

vì mới học nên tôi thực sự chưa hiểu hết nên không thể làm được, rất mong nhận được sự giúp đỡ giải quyết hoặc sự hướng dẫn của các bạn.Xin cám ơn nhiều.

[NoBi]

Bạn sửa lại dòng 18 -> 20 cho mỗi phép tính. Ví dụ:
Phép tính trừ: WriteLine(" {0} - {1} = {2}", Argumente(0), Argumente(1), CInt(Argumente(0)) - Argumente(1))
Phép tính nhân: WriteLine(" {0} * {1} = {2}", Argumente(0), Argumente(1), CInt(Argumente(0)) * Argumente(1))

[HaDuyNguyen]

IMG_0002.rar

(607.94 KiB) Downloaded 230 times

Cám ơn sự quan tâm và trả lời của các bạn, nhưng bạn chưa hiểu đúng vấn đề mà tôi cần sự giúp đỡ, dưới đây tôi xin viết lại cụ thể như sau:

Tôi có một chương trình với những dòng Code như sau :

Code: [Select all] [Expand/Collapse]

1. Imports System.Console
2. Module Module1
3.  
4.     Sub Main(Argumente() As String)
5.      
6.  
7.       WriteLine()
8.         WriteLine(" Number der Argumente {0}", Argumente.Length)
9.         WriteLine()
10.         If Argumente.Length > 2 Then
11.             WriteLine(" Zuviele Argumente")
12.             Exit Sub
13.         ElseIf Argumente.Length < 2 Then
14.             WriteLine(" Zuwenig Argumente")
15.             WriteLine()
16.             Exit Sub
17.         End If
18.         WriteLine(" {0} + {1} = {2}", _
19.                     Argumente(0), Argumente(1), _
20.                     CInt(Argumente(0)) + Argumente(1))
21.         WriteLine()
22.     End Sub
23.  
24. End Module

GeSHi © Codebox Plus Extension

Yêu cầu là sửa đổi Code của chương trình để khi chạy, chương trình sẽ thực hiện các phép tính cơ bản như (+ - * :) và hiển thị ra màn hình, ví dụ như hình bên dưới:
Đây là hình ảnh của chương trình khi chạy, khi viết Code thì viết trong Console, nhưng khi chạy thì lại dùng chương trình này, vì vậy mà tôi đã có bài hỏi về cách sử dụng nó.
Yêu cầu của đề bài là sửa Code mà tôi đã gửi để thực hiện các phép tính cơ bản, nếu đưa thông số sai thì chương trình sẽ báo, ngược lại thì thực hiện như bình thường.
Thí dụ : Hàng thứ 5 thì báo là đưa quá nhiều số, hàng thứ 6 thì báo đưa quá ít số và hàng thứ 7 thì báo đưa không đúng ký tự.

[1045007]

Code này trên cơ bản đã chạy đúng rồi chỉ cần thêm các phép toán và truyền các tham số hợp lý

Code: [Select all] [Expand/Collapse]

1. Imports System.Console
2. Module Module1
3.     Sub Main(ByVal Argumente() As String)
4.         WriteLine()
5.         WriteLine(" Number der Argumente {0}", Argumente.Length)
6.         WriteLine()
7.         If Argumente.Length > 3 Then
8.             WriteLine(" Zuviele Argumente")
9.             Exit Sub
10.         ElseIf Argumente.Length < 2 Then
11.             WriteLine(" Zuwenig Argumente")
12.             WriteLine()
13.             Exit Sub
14.         End If
15.         Select Case Argumente(1)
16.             Case "+"
17.                 WriteLine(" {0} + {1} = {2}", Argumente(0), Argumente(2), CInt(Argumente(0)) + Argumente(2))
18.                 WriteLine()
19.                 Return
20.             Case "-"
21.                 WriteLine(" {0} - {1} = {2}", Argumente(0), Argumente(2), CInt(Argumente(0)) - Argumente(2))
22.                 WriteLine()
23.                 Return
24.             Case "*"
25.                 WriteLine(" {0} * {1} = {2}", Argumente(0), Argumente(2), CInt(Argumente(0)) * Argumente(2))
26.                 WriteLine()
27.                 Return
28.             Case "/"
29.                 WriteLine(" {0} / {1} = {2}", Argumente(0), Argumente(2), CInt(Argumente(0)) / Argumente(2))
30.                 WriteLine()
31.                 Return
32.             Case Else              
33.                 WriteLine(" Invalid operation")
34.                 Return
35.         End Select
36.  
37.     End Sub
38. End Module

GeSHi © Codebox Plus Extension

[HaDuyNguyen]

Rất cám ơn ban đã dành thời gian giúp tôi giải đáp những thắc mắc, chắc chắn bạn là người có nhiều hiểu biết trong lĩnh vực này, nên tôi muốn hỏi bạn thêm một số vấn đề như sau:
1- chương trình bạn viết luôn thông báo số lượng Argumente, nhưng trong yêu cầu thì chỉ báo sai nếu như đưa không đúng dữ liệu và được chạy trên Developer, không phải trong Command Prompt, bạn xem lại cụ thể hình ảnh.
2-Tôi không biết sử dụng những chương trình này để mở những Code mà bạn đã viết, khi tôi đánh đường dẫn vào chương trình để mở Code thì không nhận được kết quả, bạn có thể chỉ dẫn tôi cụ thể làm thế nào sử dụng các chương trình này được không?
Tôi mới học và tập viết Code, do thiếu hiểu biết nên những vấn đề mà tôi thắc mắc đối với bạn chắc là quá đơn giản, nhưng với tôi thì hoàn toàn ngược lại, vì vậy rất mong bạn thông cảm dành chút thời gianvà nhận được sự nhiệt tình giúp đỡ của bạn. Xin cám ơn bạn nhiều.

[1045007]

Bạn bỏ dòng này đi thể không thông báo các Argumentes

Code: [Select all] [Expand/Collapse]

1.         WriteLine()
2.         WriteLine(" Number der Argumente {0}", Argumente.Length)

GeSHi © Codebox Plus Extension

- Bạn tham khảo link này để star "Developer Command Prompt": http://msdn.microsoft.com/en-us/library ... 10%29.aspx
- Dùng lệnh chuyển thư mục chứa Console Project :

lệnh:

G:\ConsoleApplication1\ConsoleApplication1\bin\Debug\ConsoleApplication1 1 + 2

[HaDuyNguyen]

Chào bạn 1045007 và các bạn khác!
1-Tôi rất cám ơn về sự nhiệt tình của bạn, tuy nhiên tôi vẫn còn một số thắc mắc , mong bạn giúp cách giải quyết. Tôi đã làm theo sự chỉ dẫn của bạn, nhưng vẫn không thể mở các chương trình giống như của bạn, tôi đã chụp màn hình như bên dưới để bạn xem và giúp cách giải quyết, tôi nghĩ có thể tôi dùng lệnh chuyển thư mục không đúng, nhưng tôi không biết là sai ở chỗ nào, do vậy chương trình đã trả lời la không tìm thấy thư mục đó.Mong bạn xem hình và giúp cho cách giải quyết.


2-Còn một vấn đề nhỏ nữa là: Code tìm số lớn nhất mà bạn viết, tôi đã chuyển cho bạn tôi( tôi học thông qua một người bạn), bạn tôi đã nộp bài cho thầy giáo, thầy xem và nhận xét, chương trinh viết đúng không sai, nhưng vì chưa học đến phần Hàm số, nên thầy không chấp nhận, phải áp dụng các phương thức khác như vòng lặp, thủ tục, biến...để giải bài tập đó, bạn có thể xem lại vấn đề đó được không?

[HaDuyNguyen]

Viết chương trình thực hiện các phép tính đơn giản với dữ kiện như sau:
Imports System.Console
Module Module1

Sub Main(Argumente() As String)


WriteLine()
WriteLine(" Number der Argumente: {0}", Argumente.Length)
WriteLine()
If Argumente.Length > 2 Then
WriteLine(" Zuviele Argumente")
Exit Sub
ElseIf Argumente.Length < 2 Then
WriteLine(" Zuwenig Argumente")
WriteLine()
Exit Sub
End If
WriteLine(" {0} + {1} = {2}", _
Argumente(0), Argumente(1), _
CInt(Argumente(0)) + Argumente(1))
WriteLine()
End Sub

End Module
Bài này trước đây tôi đã hỏi và nhận được sự trả lời, nhưng bây giờ có thêm một số dữ kiện như sau:
1- sử dung Operation(các dấu của các phép tính phải khai là String) trước khi gán và thực hiện các phép tính.
2- sử dụng các Variablen Số 1, số 2 và kết quả được khai báo là Single, phần này đã học về Hàm số và có thể áp dụng để giải bài tập này.
3- Gữa các dữ kiện phải được ngăn một khoảng cách.

[HaDuyNguyen]

Xin chào các bạn !
Tôi có gửi bài tập nhờ các bạn giúp đỡ cách giải quyết, nhưng cho đến nay vẫn chưa nhận được kết quả, hôm nay tôi nhận được bài giải của thầy , với kinh nghiệm gần 30 năm chuyên viết sách và trực tiếp giảng day của thầy trong lĩnh vực này, tôi nghĩ là bài giải của thầy cũng có thể là một tài liệu tốt, tôi xin đăng lên diễn đàn để nếu có bạn nào quan tâm đến và cũng muốn học thì có thể có thêm tài liệu tham khảo, giúp cho việc học tập được tốt hơn, hy vọng là giúp nhau cùng tiến bộ.