Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Câu 3: Viết câu lệnh rẽ nhánh tìm nghiệm của BPT ax2+bx+c>0 (a>0)
Đáp án :
Program gptb2; Uses crt; Var a,b,c:real; D,X1,X2:real; Begin Clrscr; Write(‘a,b,c:’); Readln(a,b,c); D:=b*b-4*a*c; If D<0 then writeln(‘Phuong trinh vo nghiem ’) Else Begin X1:=(-b-sqrt(D))/(2*a); X2:=-b/a-X1; Writeln(‘X1=’,X1:8:3,’ X2=’,X2:8:3); End; Readln; End.
HT
Câu 8. Câu lệnh while – do có cú pháp nào dưới đây?
A. while <điều kiện> do <câu lệnh>;
B. write <điều kiện> do <câu lệnh>;
C. while <điều kiện> to <câu lệnh>;
D. while <điều kiện> begin <câu lệnh>;end;
Câu 9. Cho biết kết quả khi thực hiện đoạn câu lệnh:
S:=0;
For i:=1 to 12 do if i mod 2 <>0 then S:=S+i;
Kết quả:
A. S=38
B. S=36
C. S=45
D. S=32
Câu 10. Cho biết kết quả khi thực hiện đoạn câu lệnh:
c:=a; a:=a-b; b:=a*c; S:=a+b;
Khi a=6 ; b=2. Kết quả:
A. S= 8
B. S= 9
C. S= 12
D. S=2
Đáp án đúng : B
b nha bn