... Bài tâp về vòng lặp for: Bài 1: Tìm tổng bình phương các số từ 1 100? Hướng dẫn giải:Var tong,n:integer;begin tong:=0; For n:=1 to 100 do tong:=tong+ sqr(x); ... dụng thư viện crt; for h:=0 to 0 do for m:=0 to 2 do for s:=0 to 100 do begin writeln(h,'|',m,'|',s); delay(1000);clrscr; {ngừng 1 giây } end; Bài 6:Phân tích một ... Bài sẽ cập nhật và sửa đổi thường xuyên write(a,'x',b,'=',a*b:2,' '); writeln end; readln;end. Bài 5: Tạo đồng hồ đếm giờ bằng nhiều hàm for lồng...