Yến Nguyễn
Hỏi từ APP VIETJACK
Viết chương trình tính tổng các số tự nhiên chia hết cho3ko vượt quá ncho trước (voiwsn là số nguyên nhập vào từ bàn phím)
Quảng cáo
1 câu trả lời 186
2 năm trước
program tinh_tong_cac_so_tu_nhien_chia_het_cho_3;
uses crt;
var i,N:integer;
S:longint;
begin
writeln('Nhap so N=');
readln(N);
S:=0;
For i:=1 to N do
If i mod 3=0 then S:=S+i;
writeln('Tong la',S);
readln;
end.
Quảng cáo
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK1 44256
-
Hỏi từ APP VIETJACK24640
-
Hỏi từ APP VIETJACK21086
Gửi báo cáo thành công!