viết ct nhập vào số n. Đếm và tính tổng các số là bội của 4

program ct;

uses crt;

var i,n,d:integer;

      S:longint;

begin clrscr;

   write('Nhap so n: '); readln(n);

     S:=0;

   for i:=1 to n do

     begin

        inc(d);

        S:=S+4*i;

     end;

   write('Co ',d,' so la boi cua 4');

   writeln('Tong chung la: ',S);

readln;

end.

Học tốt!

#include<bits/stdc++.h>
using namespace std;
int main()
{
    int n,a=0,tong=0;
    cin>>n;
    for(int i=1;i<=n;i++){
        if(i%4==0){
            a+=1;
            tong+=i;
        }
    }
    cout<<"Tong "<<a<<" so chia het cho 4 tu 1 den "<<n<<" la: "<<tong;
    //samon247
    return 0;
}