Viết chương trình: Tính tổng các số chia hết cho 9 trong dãy từ 1 đến n, với n là số nguyên được nhập từ bàn phím

Trân Đoàn Hỏi từ APP VIETJACK

đã hỏi trong Lớp 8 Tin học

· 07:47 07/03/2022

Viết chương trình:
Tính tổng các số chia hết cho 9 trong dãy từ 1 đến n, với n là số nguyên được nhập từ bàn phím

Lưu câu hỏi Lưu

Hỏi chi tiết

Quảng cáo

4 năm trước

Xác định bài toán:

-Input : số nguyên N

-Output : Các sô chia hết cho 3 và số lượng số chia hết cho 3 từ 1 đến n

Thuật toán:

Bước 1: Nhập N

Bước 2: i←1; d←0;

Bước 3: Nếu i>=n thì chuyển đến bước 6

Bước 4:Nếu i mod 3 =0 thì in ra i

Bước 5: Nếu i mod 3=0 thì d←d+1;

Bước 6: i←i+1 quay lại bước 3

Bước 7: In ra số lượng số chia hết cho 3 là d

Bước 8: Kết thúc

0 bình luận

Đăng nhập để hỏi chi tiết

4 năm trước

Program tinhtong;

uses crt;

var i, SUM, N : integer; Begin

Clrscr;

Write('Nhap N: '); Readln(n);

SUM := 0; For i:=1 to N do if (i mod 3 = 0) then SUM:= SUM + i;

Write('Tong la: ', SUM);

Readln;

End.

0 bình luận

Đăng nhập để hỏi chi tiết

Quảng cáo

Bạn hỏi - Chuyên gia trả lời

Bạn cần hỏi gì?