Câu hỏi

22/07/2013 17:05
Có ai biết giải 2 bài pascal này thì giải dùm mình với nha?
bài 1 : viết ctrình nhập 1 mảng 2 chiều gồm 4 hàng 5 cột các số nguyên. TÌm và đưa ra phần tử có giá trị lớn nhất
bài 2: viết ctrình nhập mảng 2 chiều gồm 3 hàng 7 cột các số nguyên và 1 số nguyên k.Tìm và đưa ra màn hình vị trí của phần tử giá trị k nếu không tìm thấy thì thông báo không có phần tử nào bằng k
newway
03/07/2013 10:49
đọc xong hok hiểu j hết thầy mình làm 1 kiểu bạn làm kiểu khác :)
bài 2: viết ctrình nhập mảng 2 chiều gồm 3 hàng 7 cột các số nguyên và 1 số nguyên k.Tìm và đưa ra màn hình vị trí của phần tử giá trị k nếu không tìm thấy thì thông báo không có phần tử nào bằng k
Danh sách câu trả lời (1)

Trích dẫn:
Từ bài viết của beongo02
Bài 1 nè bẹn ơi :)
Lớp mấy rùi zay?
program mang1;
uses crt;
var a:array[1..10,1..10] of integer;
tg,i,j,m,n:integer;
begin
clrscr;
{ Nhap }
writeln('Nhap ma tran:');
for i:=1 to 4 do
for j:=1 to 5 do
begin
write('a[',i,',',j,']=');readln(tg);
a[j]:=tg;
end;
{ In }
writeln('Ma tran vua nhap la:');
for i:=1 to 4 do
begin
for j:=1 to 5 do
write(a[j]:4);
writeln;
end;
{ Tim max }
tg:=a[1,1];
for i:=1 to 4 do
for j:=1 to 5 do
if a[j]>tg then
begin
tg:=a[j];
m:=i;
n:=j;
end;
write('Phan tu lon nhat la: a[',m,',',n,']=',tg);
readln;
end.
Bài sau bạn hoàn toàn có thể làm tương tự, bài này không yêu cầu nhưng mình cũng làm lưu lại vị trí ấy. Không phức tạp đâu cố lên nhé
Bài 1 nè bẹn ơi :)
Lớp mấy rùi zay?
program mang1;
uses crt;
var a:array[1..10,1..10] of integer;
tg,i,j,m,n:integer;
begin
clrscr;
{ Nhap }
writeln('Nhap ma tran:');
for i:=1 to 4 do
for j:=1 to 5 do
begin
write('a[',i,',',j,']=');readln(tg);
a[j]:=tg;
end;
{ In }
writeln('Ma tran vua nhap la:');
for i:=1 to 4 do
begin
for j:=1 to 5 do
write(a[j]:4);
writeln;
end;
{ Tim max }
tg:=a[1,1];
for i:=1 to 4 do
for j:=1 to 5 do
if a[j]>tg then
begin
tg:=a[j];
m:=i;
n:=j;
end;
write('Phan tu lon nhat la: a[',m,',',n,']=',tg);
readln;
end.
Bài sau bạn hoàn toàn có thể làm tương tự, bài này không yêu cầu nhưng mình cũng làm lưu lại vị trí ấy. Không phức tạp đâu cố lên nhé
đọc xong hok hiểu j hết thầy mình làm 1 kiểu bạn làm kiểu khác :)
Trả lời câu hỏi
Câu hỏi lĩnh vực Câu hỏi khác
Rao vặt Siêu Vip