Mọi người chép giúp em đoạn này với ạ, không ghi word hay nhập code. Ghi đơn giản trên web thôi

Program PYTAGO;

               var a,b,c,â,bb,cc: Int64;

Begin

               Read(a,b,c);

               aa: sqr(a);         //Sqr() là hàm lấy bình phương.

               bb: sqr(b);

               cc: sqr(c);

               If (aa=bb+cc)or(bb=aa+cc)or(cc=aa+bb)then

                          writeln('Ba so da nhap la bo so Py-ta-go');

               Else     writeln('Ba so da nhap khong la bo so Py-ta-go');

End.