Viết chương trình đếm các số chia hết cho 3 và 5 từ M -- N, M N là số nguyên dương nhập từ bàn phím ( M

Question

Viết chương trình đếm các số chia hết cho 3 và 5 từ M --> N, M N là số nguyên dương nhập từ bàn phím ( M < N )

tonhu · Answer

Program NN;
Uses crt;
Var m,n,d,i: longint;
Begin
Clrscr;
Write(‘Nhap m,n: ‘); Readln(m,n);
d:=0;
For i:=1 to n do
If i mod 15 = 0 then inc(d);
Write(d);
Readln
End.

Viết chương trình đếm các số chia hết cho 3 và 5 từ M –> N, M N là số nguyên dương nhập từ bàn phím ( M < N )

0 bình luận về “Viết chương trình đếm các số chia hết cho 3 và 5 từ M –> N, M N là số nguyên dương nhập từ bàn phím ( M < N )”

Viết một bình luận Hủy