Giúp mình mấy bài tập này cái mình giải không được

[hoangkiso]

:boxing:
1. Viết chương trình nhập một dãy số tối đa 50 số .Rồi in ra màng hình các số trùng nhau của dãy số.
2. Cho 1 dãy số được nhập từ bàn phím tối đa 100 số rồi in ra màng hình các số khác nhau.
3. Viết chương trình nhập 1 dãy số tối đa 100 số sau đó sắp xếp lại theo thứ tự tăng dần.
4. Viết chương trình tìm ƯCLN của n số nhập từ bàn phím

Có rảnh thì zô blog củ tui chơi nghe
*** http://vn.360plus.yahoo.com/nguyenquoc_te_96/***

[sohoriverview]

Đều là những bài rất cơ bản, bạn không làm được vì cài đặt không thành công hay là không nghĩ được thuật toán? Mình mong không phải vì bạn chưa chịu cài :|

[nguyentruong17]

sao mafko chiu giai cho tui c j zay. tui dang can lam.

[cuuseo]

Tiêu chí là giúp bạn học tốt chứ không phải là cho bạn lấy code nhé bạn. Nếu bạn lên diễn đàn chỉ để có code về nộp thì mình không giúp được rồi

[lamerjapan]

đúng đấy!mấy bài này đọc ở sách 11 đó bạn!

[tuylasg]

:boxing:
1. Viết chương trình nhập một dãy số tối đa 50 số .Rồi in ra màng hình các số trùng nhau của dãy số.
2. Cho 1 dãy số được nhập từ bàn phím tối đa 100 số rồi in ra màng hình các số khác nhau.
3. Viết chương trình nhập 1 dãy số tối đa 100 số sau đó sắp xếp lại theo thứ tự tăng dần.
4. Viết chương trình tìm ƯCLN của n số nhập từ bàn phím

Có rảnh thì zô blog củ tui chơi nghe
*** http://vn.360plus.yahoo.com/nguyenquoc_te_96/***

3. / Bb sort: chi tiết : sgk 11Tin.

For j:=N downto 2 do
     For i:=1 to j-1 do
          if a[i]>a[j] then
             swap(a[i],a[j]);

:Swap: là thủ tục hoán đổi.
4./ 1 cách đơn giản nhất dễ hiểu nhất là tìm 1 số sao cho cả N số chia hết cho số đó [IMG]data:image/png;base64,iVBORw0KGgoAAAANSUhEUgAAAAEAAAABAQMAAAA l21bKAAAAA1BMVEXh5PJm+yKVAAAAAXRSTlMAQObYZgAAAApJR EFUCNdjYAAAAAIAAeIhvDMAAAAASUVORK5CYII=[/IMG]

For i:={min(a[j]) j=1..n} downto 1 do
     begin
             j:=1;
             while a[j] mod i = 0 do inc(j);
             if j>n then
                begin
                         print(i);
                         exit;
                end;
      end;

Print: là thủ tục in ra ucln.
Bài 1+2 dùng 1 mảng đánh dấu, thuật toán giống nhau.