1. Bài toán
Yêu cầu: Viết chương trình các ước nguyên của số N. Với n được nhập từ bàn phím
- Input: Nhập số tự nhiên cần tìm ước nguyên dương
- Output:In ra màn hình hình các ước nguyên dương
2. Giải thuật:
Bước 1. Nhập thông tin:
- Bước 1.1. Nhập số tự nhiên cần tìm ước nguyên dương
Bước 2. Xử lý:
- Bước 2.1. Sử dụng vòng lặp For i:=1 to N
Bước 3. In ra màn hình các ước nguyên dương.
3. Code Pascal:
Program Tong_S;
Uses crt;
Var S, i: integer;
Begin
Clrscr;
Write('Chuong trinh tinh tong S = 1 + 2 + ... + 100 = ');
S:= 0;
For i:=1 to 100 do S:= S + i;
Write(S);
Readln;
End.
4. Giải thích code
Dong code |
Ý nghĩa |
Program Tong_S; |
Đặt tên chương trình Tong_S |
uses crt; |
Khai báo các hàm thư viện |
Var S, i: Integer |
Khai báo biến S(Tính tổng), i(biến chạy) |
clrscr; |
Xóa màn hình khi chạy chương trình |
Write('Chuong trinh tinh tong S = 1 + 2 + ... + 100 = '); |
In ra màn hình dòng chữ Chuong trinh tinh tong S = 1 + 2 + ... + 100 = |
S:=0 |
Gán giá trị 0 cho biến S |
For i:=1 to 100 do S:= S + i; |
Cho i chạy từ 1 đến 100 sẽ tính giá trị S = S trước đó + giá trị i |
Write(S);
|
In ra màn hình giá trị biến S cuối cùng. |
Readln; |
Dừng màn hình cho các bạn xem kết quả. |
5. Kết Quả Pascal
Kết luận:
▪ Bài này chúng ta sử dụng vòng lặp For do.
▪ Bài tập này rất căn bản giúp ta hiểu được cách sử dụng vòng lặp For do.
The national government, which licenses Internet playing entities, made a grievance to the World Trade Organization about the us government's actions to impede on-line gaming. The Caribbean nation gained the preliminary ruling however WTO's appeals body somewhat narrowed that favorable ruling in April 2005. Yes, all the on-line casinos on our record are strictly regulated by playing authorities in nations such as Curacao. This ensures that on-line casinos uphold a standard of truthful gaming and are topic to audits concerning their gaming practices. That stated, every casino on our record is licensed and equipped 1xbet to take actual money wagers from gamers. There is an efficient customer assist environment with phone and email choices out there.
Trả lờiXóa