Cho tệp INPUT.INP có chứa 2 nguyên tố a,b. Viết chương trình đọc dữ liệu từ tệp INPUT.INP và ghi vào tệp OUTPUT. OUT số lớn nhất của 2 số nguyên này

0 bình luận về “Cho tệp INPUT.INP có chứa 2 nguyên tố a,b. Viết chương trình đọc dữ liệu từ tệp INPUT.INP và ghi vào tệp OUTPUT. OUT số lớn nhất của 2 số nguyên này”

1. program lon_nhat;

   var f,g:text;

         a,b:integer;

   begin

         Assign(f,’INPUT.INP’);  reset(F);

         Assign(g,’OUTPUT.OUT’);   rewrite(g);

         readln(f,a,b);

         if a>b then write(g,a) else write(g,b);

         close(f);  close(g);

   end.

   Bình luận

2. program lon_nhat;

   var f,g:text;

         a,b:integer;

   begin

         Assign(f,’INPUT.INP’);  reset(F);

         Assign(g,’OUTPUT.OUT’);   rewrite(g);

         readln(f,a,b);

         if a>b then write(g,a) else write(g,b);

         close(f);  close(g);

   end.

   ${huhu$

   Bình luận