viết dùm mình chương trình. nhập hai xâu ghi kết quả ra tệp outp.txt

0 bình luận về “viết dùm mình chương trình. nhập hai xâu ghi kết quả ra tệp outp.txt”

1. uses crt;
   var str1,str2: string;
       f1: text;
   begin
       assign(f1,outp.txt);
       rewrite(f1);
       write(‘Nhap xau thu nhat: ‘);
       readln(str1);
       write(‘Nhap xau thu hai: ‘);
       readln(str2);
       writeln(f1,str1);
       writeln(f1,str2);
       close(f1);
   end.

   Bình luận