Viết chương trình nhập dữ liệu là ma trận đối xứng vào mảng hai chiều. Nhờ mn giúp mik vs ạ cảm ơn mn rất nhiều 😆😆
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.
Bài này khs quá mik ko bt lm ai giải giúp mik vs đi ạ!! Mik đag cần gấp :)))
uses crt;
var a:array[1..100,1..100]of integer;
i,n,m,j:integer;
begin
clrscr;
readln(n,m);
for i:=1 to n do
for j:=1 to m do
readln(a[i,j]);
readln;
end.
uses crt;
var a:array[1..100]of integer;
i,n,max,min: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];
min:=a[1];
for i:=1 to n do
begin
if max<a[i] then max:=a[i];
if min>a[i] then min:=a[i];
end;
writeln('So lon nhat la: ',max);
writeln('So nho nhat la: ',min);
readln;
end.
Var a:array[1..100] of integer;
i,s:integer;
Begin
For i:=1 to 100 do
Begin
Write('Nhap phan tu thu ',i,' = ');readln(a[i]);
If a[i] mod 2 <> 0 then s:=s+a[i];
End;
Write('Tong la ',s);
Readln;
End.
#include <bits/stdc++.h>
using namespace std;
double a[1000];
int i,n;
int main()
{
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
for (i=n; i>=1; i--)
if (a[i]>0)
{
cout<<i<<" ";
return 0;
}
cout<<"Khong co so am trong day";
return 0;
}
bạn tham khảo
uses crt;
var a:array[1..200]of integer;
i,n,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
t:=0;
for i:=1 to n do
if a[i] mod 2=0 then t:=t+a[i];
writeln(t);
readln;
end.
Program HOC24;
var i,n: integer;
c: array[1..1000] of integer;
f: text;
begin
assign(f,'MANG3.TXT');
reset(f);
readln(f,n);
for i:=1 to n do read(f,c[i]);
close(f);
for i:=1 to n do if c[i] mod 2=1 then write(c[i],' ');
readln
end.
uses crt;
var a:array[1..100,1..100]of integer;
i,n,m,j:integer;
begin
clrscr;
readln(n,m);
for i:=1 to n do
for j:=1 to m do
readln(a[i,j]);
readln;
end.