viết chương trình tính tổng các số nguyên từ 1 đến n chia hết cho 3 và 7 nghĩa là
nhập n rồi cho từ 1 đến n có mấy số chia hết cho cả 3 và 7 cộng lại .
tương tự chia hết cho 2 và 5
và không spam nha.
viết chương trình tính tổng các số nguyên từ 1 đến n chia hết cho 3 và 7 nghĩa là
nhập n rồi cho từ 1 đến n có mấy số chia hết cho cả 3 và 7 cộng lại .
tương tự chia hết cho 2 và 5
và không spam nha.
program tinhtong ;
uses crt ;
var T,n,i integer;
begin
write (‘ Nhap so n:’); readln(n);
T:= 0
for i:=1 to n do if n mod 3=0 or n mod 7=0 then T:=T+i;
write(‘ Ket qua cua tong la:’,T);
readln;
end.
^_^