0

bài tập mảng 1 chiều tìm max min sắp xếp

Bài tập mảng 1 chiều: Tìm max, min, sắp xếp

Bài tập mảng 1 chiều: Tìm max, min, sắp xếp

Tin học

... a [1] , i 1; Max: =a [1] ; B3 Nếu i>N đưa Max KT B4 B 41 Nếu a[i] >Max Max ←a[i] B42 i ←i +1 quay lại B3 csMax: =1; For i:=2 to N if a[i] >Max then begin Max: =a[i]; csMax:=i; end; Writeln(‘GTLN la:’ ,Max, ’Vi ... thu’,i); Readln(a[i]); End; max: =a [1] ; csmax: =1; For i:=2 to N if a[i] >max then begin max: =a[i]; csmax:=i; end; Write(‘Gia tri lon nhat la:’, max: 4, ‘Vi tri dat max la:’, csmax:4); End SỞ GIÁO DỤC ... T×M GI¸ TRÞ MIN NỘI DUNG Tìm giá trị max, a Bài toán b Thuật toán Minh họa thuật toán tìm min: (tương tự max) A: F c Chương trình Sắp xếp a Khái niệm b Thuật toán c Chương trình Min F F T F...
  • 11
  • 2,727
  • 36
Bài tập mảng 1 chiều

Bài tập mảng 1 chiều

Tin học

...
  • 1
  • 1,522
  • 11
Bài tập (Mảng 1 chiều)

Bài tập (Mảng 1 chiều)

Tư liệu khác

... readln(a[i]) end; Max a1 ; i 1; Max: =a [1] ; csmax: =1; Nếu i>N đưa MAX số i => Kết thúc; For i :=2 to n Nếu a[i] >max maxa[i], i i +1 => quay lại bước IF a[i] >max then begin max: =a[i]; csmax:=i; end; ... readln(A[i]) ; End; Max := A [1[ ; csmax : =1 ; For i := to n If (A[i] >max) Then begin max := a[i]; csmax=i; end; Writeln( Gia tri cua phan tu Max : ,Max) ; Writeln( Chi so cua phan tu Max : , csmax) ; Readln ... j -1 If A[i]>A[i +1] Then begin Tg := A[i]; A[i]:=A[i +1] ; A[i +1] :=Tg; end; Writeln( Day so duoc sap xep ); For i: =1 to n Write(A[i]:5); Readln; END Khai báo mảng chiều Nhập mảng chiều Xử lí mảng...
  • 15
  • 1,500
  • 18
Bài tập: Mảng 1 chiều

Bài tập: Mảng 1 chiều

Tin học

... mmc=array [1 100] of integer; Var A : mmc; 14 25 A[5] = 25 A[7] = 6… Bài tập1 : Nhập vào mảng số nguyên Đếm xem mảng vừa nhập có số chẵn, Tính tổng số chẵn Gợiý: - Các biến cần khai báo - Nhập vào mảng ... nguyên liên tục có dạng n1 n2, với n1 số đầu, n2 số cuối - Kiểu phần tử: kiểu phần tử mảng *Tham chiếu đến phần tử mảng [chỉ số] VD1:Type mmc=array [1 100] of integer; Câu 2:Tại ... i: =1 to n if a[i] = x then dem:=dem + 1; writeln(‘so bang’,x,’ mang la:’, dem); readln end IV - Củng cố - Cách khai báo tham chiếu đến phần tử mảng chiều - Bài tập: Nhập vào mảng số nguyên, xếp...
  • 4
  • 4,410
  • 52
Bài 11: Kiểu mảng và biến có chỉ số (Bài 11a: Mảng 1 chiều)

Bài 11: Kiểu mảng và biến có chỉ số (Bài 11a: Mảng 1 chiều)

Tư liệu khác

... For i : =1 to n IF A[i]>TB then dem:=dem +1; i A[i] Dem=0 17 20 18 21 19 17 19 +1 +1 +1 +1 TB = 18 .7 Program vd1; Uses crt; Var Khai báo mảng chiều A: Array [1 366] of integer; i,n,dem: integer; S,TB ... array [1 100] of real; Các thao tác xử lí mảng chiều a Nhập mảng chiều Ví dụ: Nhập nhiệt độ n ngày A 17 Các bước 20 18 19 21 17 19 n với n = Nhập số phần tử mảng (n) Nhập vào giá trị phần tử mảng ... tử mảng chia hết cho S :=0; For i : =1 to n IF A[i] mod = then S:=S+A[i]; 15 20 16 25 18 12 19 S = 45 Thông thường, thao tác xử lí mảng chiều dùng câu lệnh FOR DO Hãy nhớ! 15 20 19 25 18 12 16 ...
  • 13
  • 860
  • 4
Bài tập mảng một chiều

Bài tập mảng một chiều

Tin học

... readln(a[i]) end; Max a1 ; i 1; Max: =a [1] ; csmax: =1; Nếu i>N đưa MAX số i => Kết thúc; For i :=2 to n Nếu a[i] >max maxa[i], i i +1 => quay lại bước IF a[i] >max then begin max: =a[i]; csmax:=i; end; ... readln(A[i]) ; End; Max := A [1[ ; csmax : =1 ; For i := to n If (A[i] >max) Then begin max := a[i]; csmax=i; end; Writeln( Gia tri cua phan tu Max : ,Max) ; Writeln( Chi so cua phan tu Max : , csmax) ; Readln ... j -1 If A[i]>A[i +1] Then begin Tg := A[i]; A[i]:=A[i +1] ; A[i +1] :=Tg; end; Writeln( Day so duoc sap xep ); For i: =1 to n Write(A[i]:5); Readln; END Khai báo mảng chiều Nhập mảng chiều Xử lí mảng...
  • 15
  • 1,162
  • 8
Bài 13 - Bài tập mảng một chiều

Bài 13 - Bài tập mảng một chiều

Tin học

... readln(a[i]) end; Max a1 ; i 1; Max: =a [1] ; csmax: =1; Nếu i>N đa MAX số i => Kết thúc; For i :=2 to n Nếu a[i] >max maxa[i], i i +1 => quay lại bớc IF a[i] >max then begin max: =a[i]; csmax:=i; end; ... readln(A[i]) ; End; Max := A [1[ ; csmax : =1 ; For i := to n If (A[i] >max) Then begin max := a[i]; csmax=i; end; Writeln( Gia tri cua phan tu Max : ,Max) ; Writeln( Chi so cua phan tu Max : , csmax) ; Readln ... j -1 If A[i]>A[i +1] Then begin Tg := A[i]; A[i]:=A[i +1] ; A[i +1] :=Tg; end; Writeln( Day so duoc sap xep ); For i: =1 to n Write(A[i]:5); Readln; END Khai báo mảng chiều Nhập mảng chiều Xử lí mảng...
  • 15
  • 1,076
  • 6
Giáo án Tin Học lớp 11: BÀI TẬP MẢNG MỘT CHIỀU ppt

Giáo án Tin Học lớp 11: BÀI TẬP MẢNG MỘT CHIỀU ppt

Tin học văn phòng

... gì? d:=0; For i: =1 to 7do if M[i]N[i] then d:=d +1; Writeln(d); GV: Yêu cầu học sinh chạy thử đoạn chương trình với liệu vào: B 1: N: Bài 4.6 M: Đáp án C Bộ 2: N: 12 14 M: 12 14 16 HS: thực Gv: ... 4 .10 ? chan co gia tri le la:’,dem); HS: Xác định Readln; GV: Hướng dẫn học sinh nhập End mảng A, B.(tưong tự nhập mảng A Bài 4 .10 4.9) Mảng C xác định thông qua mảng A, B For i:= to n C[i*2- 1] :=A[i]; ... bai49; HS: Thực Uses crt; Gv: Ý tửơng giải thuật: Var -Khai báo mảng A integer; -Nhập mảng A I,dem,m:byte; A: array [1 100] -Kỉêm tra mảng A vị trí Begin chẵn có giá trị lẻ đếm Clrscr; Write(‘nhap...
  • 7
  • 2,098
  • 10
chuyên đề tin học chương 5 bài tập mảng 2 chiều

chuyên đề tin học chương 5 bài tập mảng 2 chiều

Tin học

... 1 1 1 Day F : 6 Day G : 7 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 6 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 ... 10 11 10 11 8 12 10 13 12 10 13 10 15 14 16 15 10 17 16 15 14 13 12 11 10 14 17 16 15 12 13 11 10 Bài 25: Nước mưa ( Thi Tin học trẻ 96 ) Cho lưới MxN ô vuông có cạnh độ dài đơn vị ( M,N < 51 ... 1 1 1 1 1 1 1 1 1 1 1 1 1 -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 -1 147 Chuyªn Tin 10 Bài 20: Cho số tự nhiên M,N (M,N >=2) mảng chiều A [1 M ,1 M ,1 N -1] Tìm gía trị bé biểu thức F=A[i1 ,i 2 ,1] + A[i2,i...
  • 52
  • 2,766
  • 27
chuyên đề tin học chương 6 luyện tập mảng 1 chiều

chuyên đề tin học chương 6 luyện tập mảng 1 chiều

Tin học

... i: =1 to N If not xoa[i] then Write(A[i]); End; BEGIN Nhap;Hien(N); Xuly;Hien2; Readln END Bài 6: Chuyªn Tin 10 11 1 Uses Crt; Const Max = 10 0; Type k1 = Array [1 Max] of integer; k2 = Array [1 2 *Max] ... Xuly;Hien(L); END Bài 5: { Phương pháp dùng MẢNG VÒNG } Uses Crt; Const Max = 10 00; Type Mang = Array [1 Max] of Integer; Var A : Mang; N,i,L,P: Integer; Xoa : Array [1 Max] of Boolean; Chuyªn Tin 10 11 0 Procedure ... N = D0 + D1 * 2! + + Dm * (m +1) ! Chú thích : (M +1) ! = 1. 2.3 (M).(M +1) Bài 18 : Tìm 10 00 phần tử theo thứ tự tăng dần mà phần tử có dạng tích luỹ thừa 2,3,5 với số mũ số tự nhiên Bài 19 : Có N...
  • 41
  • 1,048
  • 14
Bài tập: Mảng 2 chiều

Bài tập: Mảng 2 chiều

Tin học

... + 1; writeln(‘so bang’,x,’ mang la:’, dem); readln end IV - Củng cố - Cách khai báo tham chiếu đến phần tử mảng chiều - Bài tập: Nhập vào mảng số nguyên, xếp mảng theo chiều tăng dần, đưa mảng ... i: =1 to n if (a[i] mod = ) then begin dem:=dem + 1; t:= t + a[i]; end; writeln(‘so chan mang la:’, dem); writeln(‘tong so chan la:’, t); readln end Bài tập 2: Nhập vào mảng số nguyên, đưa mảng ... Program bt1; Uses crt; Var a : array [1 20] of integer; i,n,dem,x:integer; begin write(‘nhap n = ‘); readln(n); for i:= to n begin write(‘a[‘,i,’]’); readln(a[i]); end; dem:=0; for i: =1 to n if...
  • 3
  • 1,332
  • 5
skkn đổi mới phương pháp dạy học trong bài kiểu mảng 1 chiều

skkn đổi mới phương pháp dạy học trong bài kiểu mảng 1 chiều

Giáo dục học

... tài 11 B8 Thường xuyên 11 B7 Thường xuyên 11 B6 không thường xuyên 11 B1 Không áp dụng Giỏi Yếu Kém 37,5% 37,5% 0% 0% 21, 6% 43,2% 35,2% 0% 0% 25% Khá TB 11 ,1% 27,8% 47,2% 13 ,9% 7,6% 20,5% 56,4% 12 ,8% ... sau đúng? a, Type 1chieu=array [1 100] of char; b, Type mang=array (1 100) of char c, Type mang1c=array [1- 100] of char; d, Type mang1c=array [1 100] of char; Câu 10 : Trong khai báo mảng thường ... điều tra Đối với 40 học sinh lớp 11 B1, 11 B6, 11 B7, 11 B8 học môn Tin học, theo phương pháp chọn mẫu ngẫu nhiên lấy ngẫu nhiên 10 học sinh lớp có STT từ 10 đến 15 từ 25 đến 20 Em có cảm giác sợ...
  • 38
  • 1,476
  • 11
BÀI TẬP LẬP TRÌNH - DEMO CÁC PHƯƠNG PHÁP SẮP XẾP

BÀI TẬP LẬP TRÌNH - DEMO CÁC PHƯƠNG PHÁP SẮP XẾP

Kỹ thuật lập trình

... t,i1,i2,r1,r2,h:byte; begin i1: =1; i2: =1; h:=0; while (i1
  • 37
  • 754
  • 1
BÀI TẬP VỀ MẢNG 1 CHIỀU(TT)

BÀI TẬP VỀ MẢNG 1 CHIỀU(TT)

Tin học

... xuất nhiều mảng Bài toán số 3.3: Tìm kiếm thay Tìm kiếm vị trí xuất x mảng A Thay giá trị Ai x thành y Ví dụ: A: 5 1 X=5 Y =15 Kết quả: Vi tri xuat hien X la Ket qua thay the: 15 15 15 1 Hướng dẫn: ... (A[i -1] +A[i]); A[i -1] := k; A[i] := k; End; End; Bài toán số 3.4: Kiểm tra mảng có đối xứng hay không? Kiểm tra mảng có tăng dần hay không? Mảng đối xứng mảng có phần tử Ai = AN-i -1 Nếu mảng mảng ... AN-i -1 Nếu mảng mảng tăng dần, xếp thành mảng tăng dần Ví dụ: Mảng A: 15 7 15 Kết quả: Mang A doi xung, Mang A khong phai la mang tang dan Mảng A: 14 17 26 26 31 Kết quả: Mang A khong doi xung,...
  • 17
  • 4,518
  • 54
Gián án Các bài tập hay về mảng 1 chiều

Gián án Các bài tập hay về mảng 1 chiều

Tin học

... chung ớc nguyên tố) 10 / Tìm số tự nhiên nhỏ n nguyên tố tơng đơng với n 11 / Tìm số nhỏ 10 000 ớc nguyên tố khác 3,7 ,11 13 / Đọc tất sô gần nguyên ... i: =1; While ((i
  • 9
  • 6,100
  • 239
Tài liệu Các dạng bài tập C# :Căn bản mảng 1 chiều docx

Tài liệu Các dạng bài tập C# :Căn bản mảng 1 chiều docx

Kỹ thuật lập trình

... int max = a[0]; for (int i = 1; i < len; i++) if (max < a) max = a; return max; } static void XoaCacPhanTuLonNhat() { int max = timPhanTuLonNhat(); for (int i = 0; i < len; i++) xoaPhanTuX (max) ; ... timTatCaCacVTLN() { int h = 0; int max = timPhanTuLonNhat(); for (int i = 0; i < len; i++) { if (a == max) a[h] = i; h++; } Console.WriteLine("Cac vi tri cua PT Max day: "); for (int j = 0; j < ... for (int i = 0; i < len; i++) if (a == x) return i; return -1; } static bool xoaPhanTuX(int x) { int vt = timPhanTuX(x); if (vt == -1) return false; else { for (int i = vt; i < len; i++) a = a;...
  • 7
  • 3,620
  • 60
Bài 1 Tìm hiểu cách sử dụng lệnh và kiểu dữ liệu mảng 1 chiều qua chương trình có sẵn. ppt

Bài 1 Tìm hiểu cách sử dụng lệnh và kiểu dữ liệu mảng 1 chiều qua chương trình có sẵn. ppt

Tin học văn phòng

... BàiTìm hiểu cách sử dụng lệnh kiểu liệu mảng chiều qua chương trình có sẵn • • • • • • • • • • Program sum1; Uses crt; Const nmax =10 0; Type Myarray=array [1 nmax] of integer; ... âm mảng • Posi:=0;neg:=0; • If a[i]>0 then Posi:=Posi +1 • else if a[i]
  • 9
  • 374
  • 0
Bài tập về mảng 1 chiều trong pascal

Bài tập về mảng 1 chiều trong pascal

Đề thi lớp 8

... xuất nhiều mảng Bài toán số 3.3: Tìm kiếm thay Tìm kiếm vị trí xuất x mảng A Thay giá trị Ai x thành y Ví dụ: A: 5 1 X=5 Y =15 Kết quả: Vi tri xuat hien X la Ket qua thay the: 15 15 15 1 Hướng dẫn: ... (A[i -1] +A[i]); A[i -1] := k; A[i] := k; End; End; Bài toán số 3.4: Kiểm tra mảng có đối xứng hay không? Kiểm tra mảng có tăng dần hay không? Mảng đối xứng mảng có phần tử Ai = AN-i -1 Nếu mảng mảng ... số tập lập trình Pascal Created by NgoHung Vấn đề 4: Mảng chiều Bài toán số 4 .1: Viết chương trình thao tác mảng chiều với công việc sau: + Nhập xuất mảng chiều + Đếm số lần xuất giá trị mảng...
  • 46
  • 4,098
  • 13

Xem thêm