Câu hỏi:
Giúp em bài tập về nhà Tổng hợp lớp 11 câu hỏi như sau: 8,Viết các câu lệnh gán thực hiện tính các giá trị trong chương trình giải phương trình
bậc hai.
9, Viết các lệnh cho biến I tự tăng, giảm đi một, hai đơn vị
10, Viết các câu lệnh gán thực hiện hoán đổi giá trị của hai biến a và b (cùng kiểu)
Trả lời 2:
Gia Sư Hoàng Khang gữi câu trả lời dành cho bạn:
Câu 8 :
– d := b * b – 4 * a * c;
– x1 := (- b – sqrt(d)) / (2 * a);
– x2 := (- b + sqrt(d)) / (2 * a);
– x := -b/ (2 * a);
Câu 9 :
– Tăng 1 đơn vị : i := i + 1
– Giảm 1 đơn vị : i := i – 1
– Tăng 2 đơn vị : i := i + 2
– Giảm 2 đơn vị : i := i – 2
Câu 10 :
a := a + b;
b := a – b;
a := a – b;
Trả lời 1:
Gia Sư Hoàng Khang gữi câu trả lời dành cho bạn:
BT8:
Program NN;
Uses crt;
Var a,b,c,delta: extended;
Begin
Clrscr;
Write(‘Nhap a,b,c: ‘); Readln(a,b,c);
delta:=sqr(b)-4*a*c;
If delta<0 then Write(‘VO NGHIEM’);
If delta=0 then Write(‘x1 = x2 = ‘,-b/(2*a));
If delta>0 then Write(‘x1 = ‘,(-b+sqrt(delta))/(2*a),’ x2 = ‘,(-b-sqrt(delta))/(2*a));
Readln
End.
BT10:
tg:=a;
a:=b;
b:=tg;
