1.

#include <iostream>
#include <fstream>
using namespace std;
int main()
{
    int a,b,c,d,e,f,g,h,i;
    ifstream inp("DULIEU.TXT");
    ofstream otp("KQ.TXT");
    inp>>a>>b>>c>>d>>e>>f>>g>>h>>i;
    otp<<a+b+c<<" "<<d+e+f<<" "<<g+h+i<<endl;
    inp.close();
    otp.close();
    //samon247
    return 0;
}

2.

#include <iostream>
#include <fstream>
using namespace std;
bool tamgiaccan(int a, int b, int c)
{
    if(a+b<=c||b+c<=a||a+c<=b){
        return false;
    }
    if(a==b||b==c||c==a){
        return true;
    }
    return false;
}
int main()
{
    int a,b,c,d,e,f,g,h,i;
    ifstream inp("DULIEU.TXT");
    ofstream otp("KQ.TXT");
    inp>>a>>b>>c>>d>>e>>f>>g>>h>>i;
    if(tamgiaccan(a,b,c)){
        otp<<"YES"<<endl;
    }
    else{
        otp<<"NO"<<endl;
    }
    if(tamgiaccan(d,e,f)){
        otp<<"YES"<<endl;
    }
    else{
        otp<<"NO"<<endl;
    }
    if(tamgiaccan(g,h,i)){
        otp<<"YES"<<endl;
    }
    else{
        otp<<"NO"<<endl;
    }
    //samon247
    return 0;
}

3.

#include <iostream>
#include <fstream>
using namespace std;
bool tamgiacvuong(int a, int b, int c)
{
    if(a+b<=c||b+c<=a||a+c<=b){
        return false;
    }
    if(a*a+b*b==c*c||a*a+c*c==b*b||b*b+c*c==a*a){
        return true;
    }
    return false;
}
int main()
{
    int a,b,c,d,e,f,g,h,i;
    ifstream inp("DULIEU.TXT");
    inp>>a>>b>>c>>d>>e>>f>>g>>h>>i;
    if(tamgiacvuong(a,b,c)){
        cout<<"YES"<<endl;
    }
    else{
        cout<<"NO"<<endl;
    }
    if(tamgiacvuong(d,e,f)){
        cout<<"YES"<<endl;
    }
    else{
        cout<<"NO"<<endl;
    }
    if(tamgiacvuong(g,h,i)){
        cout<<"NO"<<endl;
    }
    else{
        cout<<"NO"<<endl;
    }
    //samon247
    return 0;
}

Bài 1:

program bai_giai;
var f,g:text;
    a,b,c:longint;
begin
    Assign(f,'DULIEU.TXT');   reset(f);
    Assign(f,'KQ.TXT');  rewrite(g);
    while not eof(f) do
        begin
            readln(f,a,b,c);
            writeln(g,a+b+c);
        end;
    close(f); close(g);
end.

Bài 2:

program bai_giai;
var f,g:text;
    a,b,c:longint;
begin
    Assign(f,'DULIEU.TXT');   reset(f);
    Assign(f,'KQ.TXT');  rewrite(g);
    while not eof(f) do
        begin
            readln(f,a,b,c);
            if (a+b>c) and (a+c>b) and (b+c>a) then writeln(g,'Phai')
                else writeln(g,'Khong');
        end;
    close(f); close(g);
end.

Bài 3:

program bai_giai;
var f,g:text;
    a,b,c:longint;
begin
    Assign(f,'DULIEU.TXT');   reset(f);
    Assign(f,'KQ.TXT');  rewrite(g);
    while not eof(f) do
        begin
            readln(f,a,b,c);
            if (a*a+b*b=c*c) or (a*a+c*c=b*b) or (b*c+c*c=a*a) then writeln(g,'Phai')
                else writeln(g,'Khong');
        end;
    close(f); close(g);
end.