uses crt;
var r:text;
s1,s2:string;
i,d1,d2:integer;
begin
clrscr;
assign(r,'A3.txt');
rewrite(r);
write('nhap xau thu nhat:');readln(s1);
write('nhap xau thu 2:');readln(s2);
//in ra file
if length(s1)>length(s2) then writeln(r,'xau ',s1,' dai hon xau ',s2,' va dai hon ',length(s1)-length(s2),' ky tu')
 else writeln(r,'xau ',s2,' dai hon xau ',s1,' va dai hon ',length(s2)-length(s1),' ky tu');
writeln(r,'do dai trung binh cua 2 xau la:',(length(s1)+length(s2))/2:4:2);
for i:=1 to length(s1) do
 if s1[i]=' ' then d1:=d1+1;
for i:=1 to length(s1) do
 if s2[i]=' ' then d2:=d2+1;
writeln(r,'so luong ky tu khoang trang co trong xau ',s1,' la:',d1);
writeln(r,'so luong ky tu khoang trang co trong xau ',s2,' la:',d2);
//in ra man hinh
if length(s1)>length(s2) then writeln('xau ',s1,' dai hon xau ',s2,' va dai hon ',length(s1)-length(s2),' ky tu')
 else writeln('xau ',s2,' dai hon xau ',s1,' va dai hon ',length(s2)-length(s1),' ky tu');
writeln('do dai trung binh cua 2 xau la:',(length(s1)+length(s2))/2:4:2);
for i:=1 to length(s1) do
 if s1[i]=' ' then d1:=d1+1;
for i:=1 to length(s1) do
 if s2[i]=' ' then d2:=d2+1;
writeln('so luong ky tu khoang trang co trong xau ',s1,' la:',d1);
writeln('so luong ky tu khoang trang co trong xau ',s2,' la:',d2);
close(r);
readln;
end.

#include <bits/stdc++.h>
using namespace std;
int main() {
    ofstream o("A3.txt");
    string a,b;
    getline(cin,a);
    getline(cin,b);
    if (a>b) {
        cout << "Xau thu 1 dai hon xau thu 2 va dai hon " << a.size()-b.size() << endl;
        o << "Xau thu 1 dai hon xau thu 2 va dai hon " << a.size()-b.size() << endl;
    }
    else if (a<b) {
        cout << "Xau thu 2 dai hon xau thu 1 va dai hon " << b.size()-a.size() << endl;
        o << "Xau thu 2 dai hon xau thu 1 va dai hon " << b.size()-a.size() << endl;
    }
    cout << "Do dai trung binh cua hai xau la: " << (a.size()+b.size())/2 << endl;
    o << "Do dai trung binh cua hai xau la: " << (a.size()+b.size())/2 << endl;
    int d=0,d2=0;
    for (int i=0; i<a.size(); i++) if (a[i]==' ') d++;
    for (int i=0; i<b.size(); i++) if (b[i]==' ') d2++;
    cout << "Co " << d << " khoang trang trong xau 1" << endl;
    cout << "Co " << d2 << " khoang trang trong xau 2";
    o << "Co " << d << " khoang trang trong xau 1" << endl;
    o << "Co " << d2 << " khoang trang trong xau 2";
}