Cho Tiệp baitap.txt trên đĩa D:\ chứa các số 1 3 5 7 9 . Viết chương trình đọc tệp trên và tính tổng các số nguyên lưu trong tiệc
Cho Tiệp baitap.txt trên đĩa D:\ chứa các số 1 3 5 7 9 . Viết chương trình đọc tệp trên và tính tổng các số nguyên lưu trong tiệc
program h247;
var f: text;
n, tong: integer;
begin
assign(f, ‘D:\baitap.txt’);
reset(f);
while not eof(f) do
begin
read(f, n);
tong:=tong+n;
end;
Write(‘Tong cac so la ‘, tong);
readln;
end.
#include <iostream>
#include <fstream>
using namespace std;
int main()
{
ifstream inp(“D:\\DL.INP”);
int a,b,c,d;
inp>>a>>b>>c>>d;
cout<<a+b+c+d;
inp.close();
//samon247
return 0;
}