Cho tệp BAITAP.INP chứa dãy số nguyên từ 1 đến 100. Viết chươmg trình mở tệp BAITAP.INP , in ra màn hình và tính tổng của chúng. Làm giúpe e cho 5sao

#include <iostream>
#include <fstream>
using namespace std;
int main()
{
    int arr[100],total=0;
    ifstream fileInput("BAITAP.INP");
    for(int i=0;i<100;i++){
        fileInput>>arr[i];
        total+=arr[i];
    }
    cout<<total;

    fileInput.close();
    //samon247
    return 0;
}

uses crt;
var s,i: integer;
a : array[1..100] of integer;
begin
assign(input,'Bai tap.inp');
assign(output,'baitap.out');
reset(input); rewrite(output);
for i:=1 to 100 do read(input,a[i]);
for i:=1 to 100 do write(output,a[i]:3);
for i:=1 to 100 do s:=s+a[i];
writeln(output,s);
close(output); close(input);
readln
end.