Bài 20: Mạng máy tính

HM
Xem chi tiết
NT
13 tháng 3 2023 lúc 9:56

uses crt;

var a:integer;

begin

clrscr;

readln(a);

if a>0 then write('duong')

else write('am');

readln;

end.

Bình luận (0)
HM
Xem chi tiết
KL
13 tháng 3 2023 lúc 10:07

Var a,b,x:real;

begin

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

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

if a = 0 then

begin

if b = 0 then write('Phuong trinh co vo so nghiem')

else write('Phuong trinh vo nghiem');

end

else

begin

x:=-b/a;

write('Nghiem cua phuong trinh la ',s:10:2);

end;

readln;

end.

Bình luận (0)
HT
Xem chi tiết
H24
30 tháng 4 2022 lúc 15:50

A

Bình luận (0)
HL
30 tháng 4 2022 lúc 15:52

A

Bình luận (0)
H24
30 tháng 4 2022 lúc 15:52

A

Bình luận (0)
H24
Xem chi tiết
NN
Xem chi tiết
MR
Xem chi tiết
NT
19 tháng 4 2021 lúc 21:51

Câu 21:D

Câu 22: C

Bình luận (0)
NT
19 tháng 4 2021 lúc 21:51

Câu 23: B

Câu 24: C

Bình luận (0)
NT
19 tháng 4 2021 lúc 21:51

Câu 25: D

Câu 26: A

Bình luận (0)
NT
19 tháng 4 2021 lúc 21:53

Câu 1: A

Câu 2: D

Bình luận (0)
NT
19 tháng 4 2021 lúc 21:53

Câu 3: C

Câu 4: B

Bình luận (0)
NT
19 tháng 4 2021 lúc 21:53

Câu 5: C

Câu 6: C

Bình luận (0)
TH
Xem chi tiết
TH
Xem chi tiết