... too large, ví < /b> dụ:< /b> Var M, N : array [1 100 00] of longint; {Chiếm : 2*< /b> 100 00* 4byte>64Kb} Trn thnh.- CNTT- HSPHN 1 2 < /b> 3 1 2 < /b> 3 4 < /b> 5 5 1 3 4 < /b> 8 2 < /b> 4 < /b> 4 8 Thầy trò viết < /b> chương < /b> trình < /b> tính b ng cửu chương < /b> hoàn ... chiều} Kết quả: chương < /b> trình < /b> tính đưa kết b ng cửu chương < /b> 1 1 1 2 < /b> 2 Tin hc 11 Kiu mng trình < /b> Có chương < /b> trình < /b> khai b o không sai cú pháp vượt kích thước cho phép, chương < /b> trình < /b> dịch b o lỗi Structure ... Em cho ví < /b> dụ?< /b> ARRAY Mang : ARRAY 10 [1 3] of ARRAY [1 4]< /b> of integer ; Giải < /b> thích: Ta khai b o biến Mang gồm phần tử, phần tử biến Mang có kiểu mảng gồm phần tử kiểu số nguyên - Trong TuborPascal...
... SAMAC.INP SAMAC.OUT 12(< /b> Quãng đường Min) (1,3) (2 < /b> ,4)< /b> (3,3) (4,< /b> 2)< /b> (5 ,2)< /b> Thuật giải-< /b> B ớc 0 :B qua - B ớc 1:Trọng số độ chênh cao hai ô liên tiếp - B ớc 2:< /b> Quy tắc -B ớc 3:Công thức tối ưu: B[ i,j]là quãng ... nàythì toán giải < /b> xong Lưu ý toán có lờigiải B ớc 1:Trọng số tuỳ xem S1[i] khác S[j] B ớc 2:< /b> Quy tắc đi: B ớc 3:Công thức B[ 0, j]= với j =1 l B[ i ,0] = với i =0 ll B[ i,j]= min {B[ i,j-1] ,B[ i-1,j] ,B[ i-1,j-1]+gt} ... phátvà trình < /b> mua hàng Mỗi ngăn chứa qua biểu diễn theo dạng ″(x,y) ″ (x,y) vị trí ngăn chứa SHOP.INP SHOP.OUT 80( Lượng hàng mua Max) (1,3)(1 ,2)< /b> (2,< /b> 2) (2,< /b> 1) (3,1) (3 ,2)< /b> (3,3) (3 ,4)< /b> (4,< /b> 4) Thuật giải:< /b> ...
... out=’OUT.TXT’; Max =21< /b> ; C1:Array[1 3]of byte= (0, 1,3); C2:Array [0 3]of byte= (0, 3 ,0, 1); Type arr=array[1 Max,1 Max] of shortint; var a: arr; OK: Boolean; n,io,jo:byte; g: text; Procedure Docfile; var i,j: byte; ... KT(a:arr):Boolean; var i,j:byte; Begin KT:=true; for i:=1 to N For j:=1 to N+1 If a[i,j]=-1 then beginkt:=false; exit; end; end; Procedure Tim(var io,jo: byte); var i,j:byte; Begin io: =0; jo: =0; fori:=1 ... a:arr); var i,j,d,vt,s: byte; Begin fori:=1 to N forj:=1 to N if A[i,j] in [0, 1,3] then a[j,i]:=c2[a[i,j]]; fori:=1 to N begin s: =0; d: =0; forj:=1 to n if a[i,j]=-1 then begin vt:=j; inc(d); end;...
... vào (INPUT): t1,t2,t3,t4,t5,t6,t7 viết < /b> chương < /b> trình < /b> * Dữ cần tính in ragiải toán ? (OUTPUT): tb, dem Program vd1; Uses crt; Var t1,t2,t3,t4,t5,t6,t7,tb : real; dem : integer; BEGIN Clrscr; write( ... ); readln(t1,t2,t3,t4,t5,t6,t7); tb : = (t1+t2+t3+t4+t5+t6+t7)/7; dem : = ; if (t1>tb) then dem := dem + 1; if (t2>tb) then dem := dem + 1; if (t3>tb) then dem := dem + 1; if (t4>tb) then dem := ... tử kiểu Ví < /b> dụ:< /b> A 17 20 18 25< /b> 19 12 < /b> 19 Trong : Tên mảng : A Số phần tử mảng: Kiểu liệu phần tử: Kiểu nguyên Khi tham chiếu đến phần tử thứ i ta viết < /b> A[i] Ví < /b> dụ:< /b> A[5] = 19 2 < /b> Khai b o mảng...
... hai chiều Ví < /b> dụ:< /b> int A[3] [4]< /b> = { {2,< /b> 3,9 ,4}< /b> , {5,6,7,6} , {2,< /b> 9 ,4,< /b> 7} }; Với khai b o ta có : A [0] [0] = 2;< /b> A [0] [1] = 3; A[1][1] = 6; A[1][3] = 6; Với ví < /b> dụ < /b> ta có hình dạng ma trận sau 3 2 < /b> Lưu ý: ... ma trận số thực 900 ngược chiều kim đồng hồ Ví < /b> dụ:< /b> 70 Viết < /b> chương < /b> trình < /b> dịch phải xoay vòng cột ma trận số thực 71 Viết < /b> chương < /b> trình < /b> dịch xuống xoay vòng dòng ma trận số thực 72 < /b> (*) Cho ma trận ... loại 21< /b> Viết < /b> hàm tìm đường chéo có tổng lớn đường chéo loại c B i tập tìm kiếm 22< /b> Viết < /b> hàm tìm vị trí phần tử lớn ma trận số nguyên 23< /b> Viết < /b> hàm tìm vị trí phần tử nhỏ ma trận số nguyên 24< /b> < /b> Viết...
... X[1,1], X[1 ,2]< /b> , X[1,3] X [2,< /b> 1], X [2,< /b> 2], X [2,< /b> 3] Mảng Y gồm phần tử kiểu chuỗi String[15] : Y[‘a’,1], Y[‘a’ ,2]< /b> , Y[‘a’, 3] Y[ b ,1], Y[ b ,2]< /b> , Y[ b , 3] Y[‘c’,1], Y[‘c’ ,2]< /b> , Y[‘c’, 3] Có thể ví < /b> X nhà ... X[1] [2]< /b> , X[1][3] X [2]< /b> mảng có phần tử kiểu thực X [2]< /b> [1], X [2]< /b> [2]< /b> , X [2]< /b> [3] Ðiều tương tự áp dụng cho biến mảng Y Hai cách viết < /b> X[i][j] X[i,j] phần tử Khai b o gán giá trị ban đầu: Có thể khai b o ... 2,< /b> 3] of Real; Const X : Kmang1 = ( (1.5, 2.< /b> 5, 3.5), (5 .0, 6.5, 7 .0) ); Khi X mảng hai chiều có phần tử kiểu thực có giá trị là: X[1,1]=1.5, X[1 ,2]< /b> =2.< /b> 5, X[1,3]=3.5 X [2,< /b> 1]=5 .0, X [2,< /b> 2]=6.5, X [2,< /b> 3]=7.0...
... GIO lý thuyết S :01 Lp: S lng hc sinh Thc hin:trên lớp Ngy15thỏng04Nm 20 10 S gi lờn lp: 06 loi hỡnh bi ging: lý thuyết A/ Mc tiờu: Kin thc: - Hiu khỏi nim mng chiu - Hiu cỏch khai b o v truy cp ... tiến trình < /b> lên lớp n nh lp: (thi gian 01 phỳt) S hc sinh vng mt/ tng s.H/S vng Kim tra bi c: (thi gian 04 < /b> phỳt) - D kin hc sinh kim tra: 02 < /b> Tờn im câu hỏi kiểm tra: Cõu hi 1: Em hóy trỡnh by kiu ... xột v trỡnh by s lc li cỏc ý chớnh ca cõu hi Cõu hi 2:< /b> Theo em li ớch ca khai b o mng mt chiu l gỡ? Cho bit cỏc cỏch khai b o mng? Gi mt HS lờn bng tr li - Sau HS tr li cõu hi gi mt HS khỏc nhn...
... dùng biến max để lưu trữ giá trị lớn #define SIZE int LonNhat (int a[SIZE][SIZE]) { int i,j; int max = a [0] [0] ; for(i = 0; i < SIZE; i++) for(j = 0; j < SIZE; j++) { if(a[i][j] > max) max = a[i][j]; ... } return max; } Tìm phần tử lớn mảng Duyệt qua tất phần tử, dùng biến max để lưu trữ giá trị lớn #define SIZE int LonNhat (int a[SIZE][SIZE]) { int i,j; int max = a [0] [0] ; for(i = 0; i < SIZE; ... = 0; for(i = 0; i < 5; i++) { if(a[i][i] %2 < /b> == 0) tong = tong + a[i][i]; } return tong; } Tính tích số lẻ đường chéo phụ Tính tổng số lẻ đường chéo phụ int Cheo2Phu (int a[5][5]) { int tong = 0; ...
... }HOCSINH; Sử dụng mẫu tin Có thể dùng mẫu tin kiểu liệu chương < /b> trình < /b> POINT d1, d2, d3; TRIANGLE tg1, tg2; Sử dụng dấu chấm (.) để truy xuất đến thành phần mẫu tin d1.x = 100 ; d2.y = 20 0; tg1.A = ... giá lớn 100 0 void XuatSachTheoYeuCau(SACH mang [25< /b> ], int n) { int i = 0; for(i = 0; i < n ; i++) { if(mang[i].nam_xuat_ban 100 0) XuatSach(mang[i]); } } Hướng giải < /b> In ... a[3][5]; 4 < /b> 5 Truy xuất phần tử mảng chiều Gán giá trị cho phần tử a [0] [1] = 6; a[1] [2]< /b> = 9; scanf(“%d”,&a [0] [2]< /b> ); Lấy giá trị phần tử mảng chiều: x = a [0] [0] ; printf(“Dong 0, cot 1: %d”, a [0] [1]); Ví...