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

Hung Mai
Xem chi tiết
Nguyễn Lê Phước Thịnh
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)
Hung Mai
Xem chi tiết
Kiều Vũ Linh
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)
Hoàng Thế
Xem chi tiết
Tòi >33
30 tháng 4 2022 lúc 15:50

A

Bình luận (0)
Hồ Hoàng Khánh Linh
30 tháng 4 2022 lúc 15:52

A

Bình luận (0)
(っ◔◡◔)っ ♥ Kiera ♥
30 tháng 4 2022 lúc 15:52

A

Bình luận (0)
vanila
Xem chi tiết
Nguyễn Gia Bảo Nam
Xem chi tiết
Mũ Rơm
Xem chi tiết
Nguyễn Lê Phước Thịnh
19 tháng 4 2021 lúc 21:51

Câu 21:D

Câu 22: C

Bình luận (0)
Nguyễn Lê Phước Thịnh
19 tháng 4 2021 lúc 21:51

Câu 23: B

Câu 24: C

Bình luận (0)
Nguyễn Lê Phước Thịnh
19 tháng 4 2021 lúc 21:51

Câu 25: D

Câu 26: A

Bình luận (0)
Nguyễn Lê Phước Thịnh
19 tháng 4 2021 lúc 21:53

Câu 1: A

Câu 2: D

Bình luận (0)
Nguyễn Lê Phước Thịnh
19 tháng 4 2021 lúc 21:53

Câu 3: C

Câu 4: B

Bình luận (0)
Nguyễn Lê Phước Thịnh
19 tháng 4 2021 lúc 21:53

Câu 5: C

Câu 6: C

Bình luận (0)
Thu Hằng
Xem chi tiết
Thu Hằng
Xem chi tiết