Do chu vi là 120 cm nên chiều dài cạnh là 120 : 4 = 30 cm

Vậy diện tích bức tranh bạn An vẽ là: 30 \(\times\) 30 = 900 cm²

Đáp án: B

- Tổ chức và khai thác thông tin trên Internet.

- Thư điện tử.

- Tìm kiếm thông tin.

- Đào tạo qua mạng.

- Hội thảo trực tuyến.

- Thương mại điện tử.

Var a,b,c,d,e,s:integer;

Begin

Write('Nhap so thu nhat ');readln(a);

Write('Nhap so thu hai ');readln(b);

Write('Nhap so thu ba ');readln(c);

Write('Nhap so thu tu ');readln(d);

Write('Nhap so thu nam ');readln(e);

s:=a+b+c+d+e;

Write('Tong la ',s);

Readln;

End.

5 câu đầu sai, câu cuối đúng

D

Sai

Var a,b:integer;

Begin

Write('Nhap A = ');readln(a);

Write('Nhap B = ');readln(b);

Write('Tich cua A va B la ',a*b);

Readln;

End.

Var a,b,c:real;

Begin

Write('Nhap a = ');readln(a);

Write('Nhap b = ');readln(b);

Write('Nhap c = ');readln(c);

If (a + b > c) and (b + c > a) and (c + a > b) then

Begin

If (a*a = b*b + c*c) or (b*b = a*a + c*c) or (c*c = a*a + b*b) then

Write('tam giac vuong')

Else write('Khong la tam giac vuong');

End

Else write('ba canh vua nhap khong lap thanh tam giac');

Readln

End.

Một số máy tính và thiết bị được kết nối để truyền thông tin cho nhau

Var b,c,x:real;

Begin

Write('Nhap b = ');readln(b);

Write('Nhap c = ');readln(c);

If b = 0 then

Begin

If c = 0 then write('phuong trinh co vo so nghiem')

Else write('phuong trinh vo nghiem');

End

Else

Begin

x:=-c/b

Write('Phuong trinh co nghiem la ',x:10:2);

End;

Readln;

End.