Ha, xin lỗi.. Bạn muốn gán thì dùng dấu := 

VD: Muốn gán a bằng 3 thì nhập câu lệnh a:=3;

clrscr;

write('nhap canh a: ');readln(a);

P:=a*4;

S:=a*a;

writeln('Chu vi hinh vuong canh a la: ',P);

writeln('Dien tich hinh vuong canh a la: ',S);

a:=3;

lệnh gán là      := 

x=3

write('Nhap n: ');readln(n);

str(n,s);

d:=length(s);

if s[d-1]+s[d]='68' then writeln('day la bien so dep')

else writeln('day khong phai bien so dep');

Câu 1: Nêu những nguyên nhân làm cho địa vị kinh tế Mĩ suy giảm. Theo em, trong các nguyên nhân trên, nguyên nhân nào quan trọng nhất và giải thích vì sao? 

Câu 2: Nêu những nguyên nhân dẫn đến sự phát triển thần kì của nền kinh tế Nhật Bản trong những năm 70 của thế kỉ XX. Theo em, trong các nguyên nhân trên, nguyên nhân nào quan trọng nhất và giải thích vì sao? 

25000000m² =  25km²