Cách nhập giá trị mảng 1 chiều, mảng 2 chiều
K
Khách
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Những câu hỏi liên quan
TQ
18 tháng 4 2021
phần đọc tự viết
for i:=j to n do
b[i+1]:=a[i];
for i:=1 to j do write(g,a[i]);
write(g,M);
for i:=j+1 to n+1 do
write(g,b[i]);
19 tháng 4 2021
uses crt;
var a,b:array[1..100]of integer;
i,n,m,k,tam:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
for i:=1 to n do
write(a[i]:6);
writeln;
write('Nhap m='); readln(m);
write('Nhap chi so k='); readln(k);
for i:=1 to k do
b[i]:=a[i];
for i:=k+2 to n+1 do
b[i]:=a[i-1];
b[k+1]:=m;
for i:=1 to n+1 do
write(b[i]:6);
readln;
end.
17 tháng 2 2021
uses crt;
var a,b:array[1..100]of real;
i,n,dem:integer;
max:real;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
dem:=0;
for i:=1 to n do
if a[i]>0 then
begin
inc(dem);
b[dem]:=a[i];
end;
if dem=0 then writeln('1')
else begin
max:=b[1];
for i:=1 to dem do
if max<b[i] then max:=b[i];
writeln(max:4:2);
end;
readln;
end.
13 tháng 2 2023
# Nhập mảng
m = int(input('Nhập số hàng: '))
n = int(input('Nhập số cột: '))
array = [[int(input()) for _ in range(n)] for _ in range(m)]
# In các giá trị chẵn
for i in range(m):
for j in range(n):
if array[i][j] % 2 == 0:
print(array[i][j], end=' ')
print()
AP
25 tháng 7 2021
cau 1:
uses crt;
var a:array[1..100] of integer;
n,i,min: integer;
begin
readln(n);
for i:=1 to n do
readln(a[i]);
min:=a[1];
for i:=2 to n do
if min>a[i] then min=a[i];
writeln(a[i]);
readln;
end.
cau 2:
uses crt;
g:text;
s:string;
const fo='CHUSO.TXT';
begin
assign(g,fo);
rewrite(g);
readln(s);
for i:=1 to length(s) do
if not((s[i] in ['a'..'z'])and(s[i] in ['A'..'Z])) then delete(s,i,1);
writeln(g,s);
end.
31 tháng 1 2021
uses crt;
var a:array[1..100]of integer;
i,n,t,max:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
max:=a[1];
for i:=1 to n do
if max<a[i] then max:=a[i];
t:=0;
for i:=1 to n do
if max=a[i] then t:=t+a[i];
writeln('Tong cac phan tu co gia tri lon nhat la: ',t);
readln;
end.
21 tháng 2 2022
uses crt;
var a:array[1..100]of integer;
i,n,t,j,tam:integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
for i:=1 to n do write(a[i]:5);
writeln;
writeln('Cac so duong la: ');
for i:=1 to n do if (a[i]>0) then write(a[i]:4);
writeln;
t:=0;
for i:=1 to n do
if a[i] mod 3=0 then t:=t+a[i];
writeln(t);
for i:=1 to n-1 do
for j:=i+1 to n do
if a[i]<a[j] then
begin
tam:=a[i];
a[i]:=a[j];
a[j]:=tam;
end;
for i:=1 to n do write(a[i]:4);
readln;
end.
Bạn tham khảo dưới đây
link: https://www.iostream.vn/modern-cpp/mang-1-chieu-mang-2-chieu-ksWnH
Mảng 1 chiều
Khai báo
#include
int main()
{
int a[11] = { 1, 2, 3, 4, 5, 6, 7, 8 };
printf("%d", a[1]); // in giá trị ở vị trí "1" => a[1] =2
return 0;
}
Mảng 2 chiềuKhai báo#include
int main()
{
int a[3][4];
a[0][0] = 8;
a[0][1] = 9;
a[0][2] = 2;
a[0][3] = 6;
a[1][0] = 1;
a[1][1] = 5;
a[1][2] = 4;
a[1][3] = 2;
a[2][0] = 3;
a[2][1] = 1;
a[2][2] = 4;
a[2][3] = 8;
printf("%d",a[1][2]); // xuất giá trị tại a[1][2] = 7;
return 0;
}