Question

Viết chương trình nhập vào 3 số nguyên , sau đó ghi 3 số nguyên vừa nhập đó vào tệp Dulieu.txt ở ổ D:\

Answer 1

uses crt;

const fi='dulieu.txt'

var f1:text;

a,b,c:integer;

begin

clrscr;

assign(f1,fi); rewrite(f1);

write('Nhap a='); readln(a);

write('Nhap b='); readln(b);

write('Nhap c='); readln(c);

writeln(f1,a);

writeln(f1,b);

writeln(f1,c);

close(f1);

end.