... 2: + Ý tưởng: + Thuật toán: B1: Nhập n; B2: Nếu sqrt(n)=round(sqrt(n)) xuất n số phương Ngược lại xuất n không số phương Bước 3: Trình bày lời giải Var n:integer; Begin Write(‘Nhap n:’); readln(n);... (t+c+dv=a) and (t*c*dv) then write(t*100+c*10 +dv); readln; end Đề: Viết chương trình tính n! phương pháp khử đệ quy Ý tưởng: Thuật toán: Bước 1: Nhập n Bước 2: i  1, t  Bước 3: Nếu (n=0) thông... la:’,BCNN(a,b):10:2); Readln; End Bước 4: TH1: a=1; b=3; TH2: a=6; b=9; TH3: a=6; b=7 Câu: lập phương trình để loại bỏ phần tử khỏi mảng A gồm n phần tử cho trước( phần tử số nguyên) a) Loại