Viết câu lệnh độc dữ liệu từ tệp van.dat cho các biến a,b,c,d

0 bình luận về “Viết câu lệnh độc dữ liệu từ tệp van.dat cho các biến a,b,c,d”

1. program doc_dl;

   uses crt;

   var f:text;

   begin

           clrscr;

           Assign(f,’van.dat’);  reset(f);

           readln(f,a,b,c,d);

           writeln(‘a= ‘,a);

           writeln(‘b= ‘,b);

           writeln(‘c= ‘,c);

           writeln(‘d= ‘,d);

           readln;

   end.

   Bình luận