Kết quả tìm kiếm

Cảm ơn ạ. Còn 3 câu đầu em làm được rồi :D

Em có vài bài, cũng không khó lắm, mọi người giúp. 6a^2y - 3aby +4a^2x - 2abx ax^2y - bx^2y -ax +bx +2a -ab ax -bx -2cx -2a +2b +4c 36(x-y)^2 -26(2x-1)^2 9(x+y)^2 - (2x-y)^2 25x^2 - 20xy +4y^2 x^9 +1 x^2 +2xy +y^2 - 25

Mình nghĩ nó như này: Program bt; Uses crt; Var a: string; i,n: longint; Begin Clrscr; Wrriteln('Moi nhap chuoi ki tu'); Readln(a); n:=length(a); Writeln('Chuoi ki tu của bạn:',a); Writeln('So ki tu trong chuoi la:',n); Write('Xau dao nguoc la: '); For i:=1 to n do Write(a:2); Readln; End.