| Tìm kiếm | Inside GoogleDisplay results as : Posts Topics Advanced Search |
| Most Viewed Topics | | Viết chương trình nhập vào một mảng gồm N số nguyên. Sắp xếp lại mảng theo thứ tự tăng dần và in kết quả ra màn hình. | | Xóa các phần tử trùng nhau trong mảng 1 chiều | | Lập chương trình Pascal để in bảng cửu chương ra màn hình. | | Đếm số nguyên tổ trong mảng 1 chiều | | Nhập vào 1 số. Xác định xem số đó có phải số nguyên tố hay không. | | iết chương trình nhập vào một mảng A gồm N số nguyên và nhập thêm vào một số nguyên X. | | Giải nén xâu trong pascal | | Vừa gà vừa chó, bó lại cho tròn, ba mươi sáu con, một trăm chân chẵn. Hỏi có bảo nhiêu chó gà? | | Tính tổng chỉ sổ cột hàng chẵn trong mảng 2 chiều | | Trò Chơi Đánh Chữ Trên PASCAL |
|
| Top posters | | codeturbopascal | | | mzone1998 | | | tungduong08 | | | hungthomvp | | | hangcincin | | | vie_tetua | | | saobang050506 | | | tinnguyen0702 | |
|
| Latest topics | » Đếm số nguyên tổ trong mảng 1 chiều Tue Dec 30, 2014 9:23 pm by hangcincin» Có ai chơi vlcm khôngTue Dec 30, 2014 9:18 pm by hangcincin» Nhập vào 1 số. Xác định xem số đó có phải số nguyên tố hay không. Fri Apr 18, 2014 4:22 pm by hungthomvp» Đây là các bài thi khảo sát HSG nèWed Apr 02, 2014 4:27 pm by hungthomvp» Trò Chơi Đánh Chữ Trên PASCALWed Feb 05, 2014 1:30 pm by tinnguyen0702» Làm gấp cho em cái bài mảng 2 chiều vs anh chị em ơi.Sun Sep 22, 2013 2:47 am by vie_tetua» Lập chương trình Pascal để in bảng cửu chương ra màn hình.Sun Apr 21, 2013 7:07 pm by tungduong08» iết chương trình nhập vào một mảng A gồm N số nguyên và nhập thêm vào một số nguyên X.Sun Apr 21, 2013 7:04 pm by tungduong08» hướng dẩn cách đăng ký Sun Apr 21, 2013 2:36 pm by codeturbopascal |
| Statistics | | Diễn Đàn hiện có 39 thành viênChúng ta cùng chào mừng thành viên mới đăng ký: xuanmaiqcnh.nguyen2002Tổng số bài viết đã gửi vào diễn đàn là 40 in 20 subjects |
| | codeturbopascal :: Ngôn ngử lập trình pascal :: Mảng 1 chiều |
| Xóa các phần tử trùng nhau trong mảng 1 chiều |  |
| | Tác giả | Thông điệp |
|---|
codeturbopascalAdmin   Tổng số bài gửi : 22Danh vọng : 64 Được thank : 7Ngày Tham gia : 19/04/2013Tuổi : 29Đến từ : Quảng trịThú Cưng :  |  Tiêu đề: Xóa các phần tử trùng nhau trong mảng 1 chiều Sun Apr 21, 2013 2:08 pm | | Code: Program Bo_so_trung; Const Max=100; Var a:Array[1..Max] Of Integer; i,j,k,n:Integer;Begin Writeln('XOA BO CAC SO TRUNG NHAU'); Writeln('------------------------'); Writeln; Write('-Nhap so phan tu mang: '); Readln(n); For i:=1 To N Do Begin Write('-Phan tu A[',i,']= '); Readln(a[i]); End; i:=2; While i <= N Do Begin j:=1; While a[j] <> a[i] Do j:=j+1; If j < i Then Begin For k:=i to n-1 Do a[k]:= a[k+1]; n:=n-1; End Else i:=i+1; End; Writeln; Write('-Mang con lai: '); For i:=1 to n Do Write(a[i]:8); Writeln; Writeln(' Bam phim <Enter> de ket thuc '); ReadlnEnd. | | LikeDislike |
|  | | | Xóa các phần tử trùng nhau trong mảng 1 chiều | |
|
| Trang 1 trong tổng số 1 trang |
| Similar topics |  |
|
| Similar topics |  |
| | » iết CT nhập từ bàn phím mảng 1 chiều và xóa 1 phần tử của mảng có n phần tử.» Đếm số nguyên tổ trong mảng 1 chiều» Tổng m số tận cùng của n trong pascal» iết chương trình nhập vào một mảng A gồm N số nguyên và nhập thêm vào một số nguyên X.» Tìm giá trị lớn nhất mảng 1 chiều |
| Permissions in this forum: | Bạn không có quyền trả lời bài viết | | codeturbopascal :: Ngôn ngử lập trình pascal :: Mảng 1 chiều | |
|
| | codeturbopascal :: Ngôn ngử lập trình pascal :: Mảng 1 chiều | |
|
|
| Chuyển đến: Chọn Diễn Đàn||--Ngôn ngử lập trình pascal| |--Câu lệnh Vòng lặp| |--Câu lệnh rẻ nhánh| |--Mảng 1 chiều| |--Mảng 2 chiều| |--Xâu| |--Trò chuyện linh tinh |
|
codeturbopascal
