Cho tệp INPUT.INP có chứa 3 nguyên tố a,b,c. 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 3 số nguyên này

0 bình luận về “Cho tệp INPUT.INP có chứa 3 nguyên tố a,b,c. 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 3 số nguyên này”

1. program lon_nhat;

   var f,g:text;

        a,b,c,max:integer;

   begin

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

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

         readln(f,a,b,c);

         max:=a;

         if b>max then max:=b;

         if c>max then max:=c;

         write(g,max);

         close(f);  close(g);

   end.

   $#huhu$

   Bình luận

2. program lon_nhat;

   var f,g:text;

        a,b,c,max:integer;

   begin

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

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

         readln(f,a,b,c);

         max:=a;

         if b>max then max:=b;

         if c>max then max:=c;

         write(g,max);

         close(f);  close(g);

   end.

   Bình luận