Đọc từ tệp "INPUT.TXT" 2 số nguyên A và B (A<B) tính tổng các số chia hết cho 3 trong phạm vi từ A đến B. Ghi kết quả ra tệp "OUTPUT.TXT" Giúp mk vs ạ

#include <iostream>
#include <fstream>
using namespace std;
int main()
{
    int a,b;
    ifstream inp("INPUT.TXT");
    ofstream out("OUTPUT.TXT");
    inp>>a>>b;
    for(;a<=b;a++){
        if(a%3==0){
            out<<a<<" ";
        }
    }
    inp.close();
    out.close();
    //samon247
    return 0;
}

uses crt;
var d:text; a,b,i,tong:longint;
begin
clrscr;
   assign(d,'input.txt');reset(d);
       readln(d,a,b);
   close(d);
   assign(d,'output.txt');rewrite(d);
      for i:=a to b do
         if i mod 3=0 then inc(tong,i);
      writeln(d,tong);
   close(d);
end.