KIỂU MẢNG - NHỮNG BÀI TẬP PASCAL LỚP 11 HAY

  • TRANG CHỦ
  • BÀI TẬP CHƯƠNG TRÌNH ĐƠN GIẢN
  • BÀI TẬP CẤU TRÚC RẼ NHÁNH VÀ CẤU TRÚC LẶP
  • BÀI TẬP KIỂU MẢNG VÀ KIỂU XÂU
  • BÀI TẬP VỀ KIỂU DỮ LIỆU TỆP
  • BÀI TẬP CHƯƠNG TRÌNH CON

KIỂU MẢNG

1. Mảng một chiều a. Khái niệm: Mảng một chiều là một dãy hữu hạn các phần tử có cùng kiểu. Mảng được đặt tên và mỗi phần tử mang một chỉ số. Với mảng một chiều ta quan tâm đến: + Tên kiểu mảng một chiều. + Số lượng phần tử trong mảng. + Kiểu dữ liệu của phần tử. + Cách khai báo biến mảng. + Cách tham chiếu đến phần tử. b. Khai báo mảng một chiều: + Khai báo trực tiếp: Var<tên biến mảng>: array[<kiểu chỉ số>]of <kiểu phần tử>; + Khai báo gián tiếp: Type <tênkiểumảng>=array[<kiểu chỉ số>]of <kiểu phần tử>; var <tên biến mảng>: <tên kiểu mảng>; Trong đó : + Kiểu chỉ số thường là đoạn số nguyên liên tục có dạng n1..n2, với n1 là chỉ số đầu và n2 là chỉ số cuối (n1≤n2). Nên đánh chỉ số từ 1; + Kiểu phần tử là kiểu dữ liệu của các phần tử mảng. + Tham chiếu đến phần tử mảng ta viết : <tên biến mảng>[chỉ số] VD: Tham chiếu đến phần tử thứ 20 trong mảng A ta viết A[20]. 2. Các thao tác với kiểu mảng một chiều. a. Cách nhập mảng A: write(‘Nhap so phan tu cua mang: ’);readln(n); write(‘Nhap gia tri cho tung phan tu: ’); for i:=1 to n do begin write(‘Phan tu thu ’ , i , ‘ la: ’); {write(‘A[‘,I,’]=’);} readln(A[i]); end; b. Cách in mảng A ra màn hình: writeln(‘Mang vua nhap la: ’); for i:=1 to n do write(A[i]:4); 3. Ví dụ về mảng một chiều Bài 1: Nhập vào một dãy số nguyên, tìm số nhỏ nhất trong dãy? Ý tưởng: Min:=A[1]; Duyệt từ đầu dãy đến cuối dãy, so sánh các phần tử với Min, nếu A[i]<min thì min:=A[i]; Giải quyết bài toán: Var A:array[1..200] of integer; I, n: byte; min:integer; Begin write(‘Nhap so phan tu cua mang: ’);readln(n); write(‘Nhap gia tri cho tung phan tu: ’); for i:=1 to n do begin write(‘Phan tu thu ’ , i , ‘ la: ’); {write(‘A[‘,I,’]=’);} readln(A[i]); end; min:=A[1]; For i:=2 to n do if A[i]<min then min:=A[i]; write(‘So nho nhat trong mang :’,min); readln; END. Bài 1: Nhập vào một dãy số nguyên, sắp xếp dãy thành dãy không giảm (tăng dần) theo phương pháp nổi bọt (Bubble sort) Ý tưởng: Để sắp dãy có n phần tử, thực hiện qua n-1 lượt. Ở mỗi lượt, duyệt từ đầu dãy đến cuối dãy (cần xét ở lượt đó), cứ so sánh 2 phần tử kề nhau, nếu phần tử đứng trước lớn hơn phần tử đứng sau thì đổi chỗ chúng. Giải quyết bài toán. Var A:array[1..200] of integer; J,I, n: byte; tg:integer; Begin write(‘Nhap so phan tu cua mang: ’);readln(n); write(‘Nhap gia tri cho tung phan tu: ’); for i:=1 to n do begin write(‘Phan tu thu ’ , i , ‘ la: ’); {write(‘A[‘,I,’]=’);} readln(A[i]); end; For i:=n downto 2 do For j:=1 to to i-1 do if A[j]>Ạ[j+1] then begin tg:=A[j];A[j]:=A[j+1];A[j+1]:=tg;end; writeln(‘Mang sau khi sap xep la: ’); for i:=1 to n do write(A[i],’ ‘); readln; END.

30 nhận xét:

  1. Unknownlúc 07:20 16 tháng 11, 2018

    Viết chương trình nhập vào một mảng có tối đa 100 số thực in mảng đó ra màn hìnhai đó giup mk vs

    Trả lờiXóaTrả lời
    1. Unknownlúc 20:05 17 tháng 12, 2018

      program bt1;uses crt;var A: array [1..100] of real;beginclrscr;write('nhap so phan tu mang: '); readln (n);for i:=1 to n dobeginwrite('A[',i.']'); readln (A[i]);end;for i:=1 to n do write (A[i]:5);readlnend.

      XóaTrả lời
        Trả lời
    2. Unknownlúc 19:15 1 tháng 4, 2020

      program bt1;uses crt;var A: array [1..100] of real; n,i:integer;beginclrscr;write('nhap so phan tu mang: '); readln (n);for i:=1 to n dobeginwrite('A[',i,']'); readln (A[i]);end;for i:=1 to n do write (A[i]:5);readlnend.

      XóaTrả lời
        Trả lời
    3. Unknownlúc 19:16 1 tháng 4, 2020

      Như này mí đúng nhé

      XóaTrả lời
        Trả lời
    4. Unknownlúc 06:19 9 tháng 12, 2020

      điên. 😂😂😂

      XóaTrả lời
        Trả lời
    5. Nặc danhlúc 07:05 31 tháng 1, 2023

      VD4: viết chương trình nhập vào từ bàn phím lượng mưa trung bình các ngày trong tháng của huyện (mm), đưa ra nhận xét lượng mưa TB của tháng đó: nếu >50(mưa nhiều) nếu 40 đến dưới 50 (mưa via) nếu dưới 40 (mưa ít)

      XóaTrả lời
        Trả lời
    6. Trả lời
  2. Unknownlúc 07:23 3 tháng 3, 2020

    khá là hay ạ!

    Trả lờiXóaTrả lời
      Trả lời
  3. Nặc danhlúc 04:08 6 tháng 3, 2020

    Viết chương trình tính tổng các phần tử chẳn hoặc lẻ của mảng nhập bất kì từ bàn phím(Với N<= 100)Giúp mình với������

    Trả lờiXóaTrả lời
    1. Unknownlúc 15:18 28 tháng 3, 2021

      Program bai_tap;Uses crt;Var A:array[1..100] of integer; Tong,i,n:integer;Begin Clrscr Writeln('Nhap mang A'); Readln(A); Tong:=0; For i:=1 to N do Begin Writeln('nhap phan tu thu',i); Readln (A[i]); End; For i:=1 to N do If (A[i] mod 2 =0) or (A[i] mod 2 <>0) then tong:= tong+A[i]; Writeln('ket qua la',tong); Readln;End.

      XóaTrả lời
        Trả lời
    2. Trả lời
  4. Unknownlúc 07:01 24 tháng 3, 2020

    Nhập dãy số nguyên từ bànbphim n≤100 kiểm tra trong dãy có bao nhiêu phần tu không trùng nhau.Tim các số đó in ra màn hình tạo mảng B nhận tất cả các phần tử khác trong mảng A

    Trả lờiXóaTrả lời
      Trả lời
  5. Trần Nhunglúc 22:20 26 tháng 3, 2020

    Khai báo mảng 1 chiều 50 phần tử thựcGiúp mình vs ạ

    Trả lờiXóaTrả lời
    1. Vương hackerlúc 18:45 19 tháng 12, 2020

      Write('nhap số lượng phần tử:');For i=1 to n đóBegin('Nhập phần tử thứ ',i,');readln(a[i]);

      XóaTrả lời
        Trả lời
    2. Unknownlúc 11:21 19 tháng 4, 2021

      Var A:array [1..50] of real;

      XóaTrả lời
        Trả lời
    3. Trả lời
  6. Thumailúc 01:05 14 tháng 4, 2020

    Ai giúp mình bài toán này với Nhập dữ liệu cho mảng 1 chiều có n phần tử1) đưa ra giá trị min của mảng 2) tổng các phần tử thỏa mãn điều kiện là số chẵn trong mảng3) đếm số lượng các phần tử trong mảng là số nguyênGiúp mình nhanh nha cảm ơn rất nhiều huhuu cần gấp lắm

    Trả lờiXóaTrả lời
      Trả lời
  7. Unknownlúc 22:03 14 tháng 4, 2020

    Viết ct nhập vào 1 mảng số nguyên A gồm 100 phần tử thực hiện 1 số yêu cầu sau: In ra mảng vừa nhập.Nhập vào 1 số nguyên x.Kiểm tra x có trong A hay không.Nếu có, in số lần x xuất hiện trong mảng A.Ai biết giúp mình với ạ.

    Trả lờiXóaTrả lời
      Trả lời
  8. Nặc danhlúc 20:08 23 tháng 4, 2020

    ai đó làm dùm bài này ik

    Trả lờiXóaTrả lời
      Trả lời
  9. Nặc danhlúc 07:52 6 tháng 5, 2020

    Viết chg trình khai báo và nhập mảng 1 chiều tối đa 10 phần tử là số nguyê . Hãy thông báo ra màn hình các phần tử của mảng là số nguyên tố.Giúp mk vs!!!! Cần gấp ạ!!!

    Trả lờiXóaTrả lời
      Trả lời
  10. Unknownlúc 00:51 10 tháng 8, 2020

    Nhập một dãy số xuất số thứ ba trong dãy, sử dụng mảng.

    Trả lờiXóaTrả lời
      Trả lời
  11. Vương hackerlúc 18:42 19 tháng 12, 2020

    Tôi cần giải giúp một bài tìm và sắp xếp số nguyên tố trong mảng một chiều

    Trả lờiXóaTrả lời
      Trả lời
  12. Nặc danhlúc 23:18 25 tháng 1, 2021

    Cho mảng A gồm n số nguyên thực hiện tính tổng bội của số nguyên dương x cho trước.

    Trả lờiXóaTrả lời
      Trả lời
  13. Unknownlúc 17:15 23 tháng 2, 2021

    VIẾT CHƯƠNG TRÌNH NHẬP VÀO MẢNG MỘT CHIỀU GỒM N PHẦN TỬ SỐ NGUYÊN. N ĐƯỢC NHẬP TỪ BÀN PHÍM, N NGUYÊN, DƯƠNG, N <=10A. In mảng vừa nhập ra màn hìnhB. Tính tổng các phần tử có giá trị chẳn in kết quả ra màn hìnhC. Đếm số lượng các phần tử có giá trị dươngD. Tính trung bình cộng các phần tử có giá trị chẵnE. Đưa ra vị trí của phần tử có giá trị bé nhất

    Trả lờiXóaTrả lời
    1. Nặc danhlúc 10:34 20 tháng 3, 2022

      dm bạn

      XóaTrả lời
        Trả lời
    2. Trả lời
  14. Nặc danhlúc 23:34 23 tháng 2, 2021

    Cho đường tròn tâm I bán kính r, và điểm M. Viết chương trình sử dụng kiểu mảng 1 chiều khai báo cho toạ độ điểm cho biết điểm M có nằm trên đường tròn tâm I không?Giúp mình với

    Trả lờiXóaTrả lời
      Trả lời
  15. Unknownlúc 18:52 24 tháng 2, 2021

    Viết chương trình nhập vào dãy số nguyên a có n phần tử(n<= 250) yêu cầu là:Tính tổng các phần tử dươngMong mọi người giúp

    Trả lờiXóaTrả lời
      Trả lời
  16. Nặc danhlúc 08:25 1 tháng 11, 2021

    Hay lắm ạ

    Trả lờiXóaTrả lời
      Trả lời
  17. Nặc danhlúc 20:47 16 tháng 12, 2021

    Viết chương trình mảng 1 chiều và số k. Hãy in ra các phần tử trong mảng là ước số của k ? Giúp mình bài này với :((( mình cần gấp lắm

    Trả lờiXóaTrả lời
      Trả lời
  18. Unknownlúc 07:26 30 tháng 12, 2021

    viết chương trình nhập vào một mảng a gồm n số nguyên dương. kiểm tra xem mảng a có bao nhiêu số chẵn giúp em với ạ

    Trả lờiXóaTrả lời
      Trả lời
  19. Nặc danhlúc 07:05 5 tháng 1, 2022

    VCT nhập vào một mảng gồm n số nguyêna.In ra mảng vừa nhậpb.Tính và in ra màn hình tổng các căn bậc hai của các số nguyên âm trong mảng vừa nhậpGiúp em vs ạ, e cảm ơn

    Trả lờiXóaTrả lời
      Trả lời
  20. Unknownlúc 19:49 20 tháng 3, 2022

    Viết chương trình nhập vào mảng n số nguyên hãy đếm số lượng phần tử lẻ trong dãy và hiển thị số lượng đó lên màn hình

    Trả lờiXóaTrả lời
      Trả lời
  21. Nặc danhlúc 19:19 11 tháng 2, 2023

    Viết chương trình nhập dãy n số từ bàn phím in ra màn hình số đầu tiên và số cuối cùng

    Trả lờiXóaTrả lời
      Trả lời
Thêm nhận xétTải thêm... Trang chủ Đăng ký: Bài đăng (Atom)

TÌM KIẾM

Google.com.vn youtube

Từ khóa » Bài Tập Mảng Một Chiều Pascal