`@ mikucute`
Phần C :
Program FNG;
Uses crt;
Var m,n,d,i: longint;
Begin
Clrscr;
Write('Nhap m va n: '); Readln(m,n);
s:= 0;
For i: m to n do
If i mod 3 = 0 then inc(d);
Write(d);
Readln
End.
Phần A :
Người đó nhận được số tiền lãi sâu một tháng là :
$100 : 100 × 0,15 = 0,15 (đồng)$
Sau một tháng người đó nhận được số tiền gửi và lãi là :
$100 + 0,15 = 100,15 (đồng)$
Đáp số : $100,15 (đồng)$
# Blackpink in your area