var j,max,i,n,m:longint;
    a:array[1..32000]of longint;
function cp(n:longint):boolean;
begin
     if sqrt(n)=trunc(sqrt(n)) then cp:=(true);
&nb ...

Câu 3:

var a,b:longint;
    x:real;
begin
       readln(a,b);
       x:=(a+b)/2;
       w ...

Câu 3:

var a,b:longint;
    x:real;
begin
       readln(a,b);
       x:=(a+b)/2;
       w ...

kết quả của biến x sau khi thực hiện câu lệnh là

C:18

biến a phải được khai báo kiểu dữ liệu:

d/string

để hoán đổi giá trị của 2 biến a và b ta dùng thuật toán

tam:=a;

a:=b;

b:=tam;

var n,i,d,s,m:longint;
begin
      assign(input,'nhap.inp');reset(input);
      assign(output,'xuat.out');rewrite(output);
      rea ...

5:A

6:B

7:B

8:C

9:C

10:A

Việc làm của lâm là sai , thể hiện không tôn trọng người khác và sẽ khiến cho hàng xóm mất ngủ.

Nếu là em thì em sẽ ...

Câu lệnh gán đúng cú pháp là x:=3+a;

Vì x=3+a thiếu dấu hai chấm

   x:3+a thiếu dấu bằng