TIN HỌC :BÀI TẬP KIỂU MẢNG (T2)
Giáo án, bài giảng lớp 11
TIN HỌC :BÀI TẬP KIỂU MẢNG (T2)
: Tạo mảng A gồm n (n<=100) số nguyên, mỗi số có giá trị tuyệt đối không vượt quá 300. Tính tổng các phần tử của mảng là bội số của một số nguyên dương k cho trước.
=> Chương trình:
Program Sum 1;
Uses Crt;
Const nmax:=100;
Type Myarray = Array[1..nmax] of integer;
Var A:myarray;
s, n, i, k:integer;
Begin
Clrscr;...
(New)
1232