TIN HỌC :Câu lệnh If – Then (T4)
Giáo án, bài giảng lớp 11
TIN HỌC :Câu lệnh If – Then (T4)
Ví dụ 1: Tìm nghiệm của phương trình bậc 2: ax2 + bx + c = 0 với a<>0
PROGRAM vidu1;
VAR a,b,c,x,x1,x2,delta:real;
BEGIN
Write(‘nhap a,b,a’); readln(a,b,c);
Delta:=b*b-4*a*c;
IF delta <0 THEN writeln(‘phuong
trinh vo nghiem’)
ELSE IF delta=0 THEN
Begin
X:=-b/2*a;
Writeln(‘phuong...
(New)
872