uses crt;
var i,t:integer;
begin
clrscr;
t:=0;
for i:=1 to 30 do
if i mod 3=0 then t:=t+i;
writeln(t);
readln;
end.
Đúng 0
Bình luận (0)
Các câu hỏi tương tự
Viết chương trình nhập vào từ bàn phím số nguyên dương N, sử dụng câu lệnh điều kiện để tính tổng các giá trị chia hết cho 3 trong phạm vi từ 1 đến N,sau đó in ra màn hình
23 tháng 3 2023 lúc 9:57
Viết chương trình nhập từ bàn phím số nguyên dương N,tính tổng các giá trị lẻ và chia hết cho 3 trong phạm vi từ 1 đến N.In kết quả ra màn hình (sử dụng cú pháp while...do)
Viết chương trình từ bàn phím số nguyên dương N, sử dụng câu lệnh điều kiện để tính tổng các giá trị chia hết cho 5 trong phạm vi 1 đến N. Rồi in kết quả ra màn hình
giúp mình với cảm ơn!
Viết chương trình nhập vào từ bàn phím số nguyên dương N, sử dụng câu lệnh điều kiện để tính tổng các giá trị chia hết cho 3 trong phạm vi từ 1 dến N, sau đó in ra màn hình.
Viết chương trình nhập vào từ bàn phím số nguyên dương N, sử dụng câu lệnh điều kiện để tính tổng các giá trị chia hết cho 5 trong phạm vi từ 1 dến N, sau đó in ra màn hình.
Chương trình sau thực hiện hoạt động nào?
Var i: integer
Begin
For i:= 1 to 100 do
End.
A. Tính tổng các số trong phạm vi từ 1 đến 100
B. Tính tích các số trong phạm vi từ 1 đến 100
C. Tính tổng bình phương lẻ trong phạm vi từ 1 đến 100
D. Chương trình chạy từ biến i từ 1 đến 1000 rồi ko làm gì cả
Xem chi tiết
Var i: integer
Begin
For i:= 1 to 100 do
End.
A. Tính tổng các số trong phạm vi từ 1 đến 100
B. Tính tích các số trong phạm vi từ 1 đến 100
C. Tính tổng bình phương lẻ trong phạm vi từ 1 đến 100
D. Chương trình chạy từ biến i từ 1 đến 1000 rồi ko làm gì cả
Bài 6: Viết chương trình nhập vào từ bàn phím số nguyên dương N, sử dụng câu lệnh điều kiện và câu lệnh lặp for to do để tính tổng các giá trị chia hết cho 2 và chia hết cho 3 trong phạm vi từ 1 dến N, sau đó in kết quả ra màn hình.
Đọc tiếp
Bài 6: Viết chương trình nhập vào từ bàn phím số nguyên dương N, sử dụng câu lệnh điều kiện và câu lệnh lặp for to do để tính tổng các giá trị chia hết cho 2 và chia hết cho 3 trong phạm vi từ 1 dến N, sau đó in kết quả ra màn hình.
1. Nhập số nguyên n từ bàn phím.
2. Viết ra màn hình (viết theo dòng) các số trong phạm vi từ 1 đến n và chia hết cho 5.
3. Tính tổng S = 1+2+3+…+n.
viết chương trình tính tổng các số từ 1 đến 100 chia hết cho 3