const fi='TRUNGVI.inp';fo='TRUNGVI.out';
var a,b:array[1..100] of longint;
i,j,n:longint;
procedure sort_b;
var i,j,tam:longint;
begin
for i:=1 to n do
for j:=i+1 to n do
if b[i]>b[j] then
begin
tam:=b[i];
b[i]:=b[j];
b[j]:=tam;
end;
end;
procedure sort_a;
var i,j,tam:longint;
begin
for i:=1 to n 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;
end;
begin
assign(input,fi);reset(input);
assign(output,fo);rewrite(output);
readln(n);
for j:=1 to n do
begin
for i:=1 to n do read(a[i]);
sort_a;
b[j]:=a[n div 2+1];
end;
sort_b;
writeln(b[n div 2+1]);
end.
* Chuyên dạy lập trình ONLINE cho học sinh THCS, THPT *.
Mọi giao lưu, trao đổi, xin liên hệ: Lê Quang Vinh - zalo: 037.803.8755.
Page: Lớp học Code Sky
Group FB1: Ôn thi HSG9 - THTB - TS10 chuyên tin
Group FB2: Học Scratch - Ôn thi Tin học trẻ bảng A
Thứ Ba, 3 tháng 5, 2022
TRUNGVI PAS
Đăng ký:
Đăng Nhận xét (Atom)
Không có nhận xét nào:
Đăng nhận xét
Lưu ý: Chỉ thành viên của blog này mới được đăng nhận xét.