Em hãy cho biết ý nghĩa các câu lệnh đã được đánh số bên dưới
1) Var tepA,tepB,tep C: text;
(2) Begin
(3) assign (tepA, ‘Xoai.txt’);
(4) assign (tepB, ‘Me.txt’);
(5) reset(tepA);
(6) read(tepA,A,B,C);
(7) readln(tepA,D,E);
(8) rewrite(tepB);
(9) write(tepB, ‘A=’,A, ‘D=’,);
(10) writeln(tepB, ‘x1=’, (-B-SQRT(B*B-4*A*C))/(2*A):5:3);
(11) close (tepA);
(12) close (tepB);
(13) Readln;
(14) End.
Loga
Sinh Học lớp 12
