Kiểm tra số a có phải là số nguyên tố hay không giải Program iloveyou; Uses crt; Var a, n, i: Integer; Begin Clrscr; Writeln ('nhap n') ;readln (n) ; For i: =1 to n-1 do begin If n mod i <>0 then a: =1 else a: =0; (mọi người có thể dùng true/ false nha~đi thi thì nên dùng true / false...

Chào mọi người! Em là Trang *vno 13* Mục đích em tạo bài này làĐể mọi người cùng giải đáp, học hỏi, rút kinh nghiệm về bộ môn pascal (vì có rất nhiều bài hiện tại trên google không có cách giải, hoặc không hiểu cho lắm.. v. V) Cũng là một dân trong làng nên em vô cùng thấu hiểu nỗi đau này...

dat ơi ! hòi này ~ muốn tìm bạn tốt thế nào nhở ! ( ko có bạn trên d đ luôn ý)

Bạn gì ơi! Bạn biết bài đăng ký YouTube nhận ngay 150 xu dễ dàng ko ạ? Mk là chủ bài đó . Xin lỗi bạn vì một phiền phức, mk lỡ gửi thừa cho bạn 150 xu ạ! Bạn có thể đăng ký kênh bằng một tài khoản khác hoặc gửi lại mk 150 xu Ko ạ? Thật sự xin lỗi bạn

Bạn gì ơi! Bạn biết bài đăng ký YouTube nhận ngay 150 xu dễ dàng ko ạ? Mk là chủ bài đó . Xin lỗi bạn vì một phiền phức, mk lỡ gửi thừa cho bạn 150 xu ạ! Bạn có thể đăng ký kênh bằng hai tài khoản khác hoặc gửi lại mk 150 xu Ko ạ? Thật sự

https://dembuon.vn/threads/dang-ky-kenh-youtube-kiem-ngay-150xu-de-dang.63863/ kiếm 150xu quá dễ dàng

https://dembuon.vn/threads/chien-dich-tiep-suc-mien-trung.63436/#post-761699 !!! Mn vào giải nghiệp vs em hem

Tên tài khoản tại diễn đàn: @Trang_anzu Số xu ủng hộ: 10.273 xu Đã chuyển! Em nghèo lắm được từng này thôi à~ Mọi người cùng quyên gót nha TT~TT Dù sao để tời 200.000. Xu còn xa lắm~~~~