vấn đề khó hiểu về max và min

K

khanhvytl2001

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

Xin hã̃y giải thích giúp em ý nghĩa của các câu lệnh tô đậm.:confused:
program SRECT;
const fi='SRECT.INP';
fo='SRECT.OUT';
var maxx, maxy, minx, miny, n, i : longint;
x, y : array[1..10000] of longint;
f1, f2 : text;
begin
assign(f1, fi); reset(f1);
assign(f2, fo); rewrite(f2);
readln(f1, n);
for i:=1 to n do readln(f1, x, y);
maxx:=-maxlongint;
minx:=maxlongint;
maxy:=-maxlongint;
miny:=maxlongint;
for i:=1 to n do
begin
if x>maxx then maxx:=x;
if x<minx then minx:=x;
if y>maxy then maxy:=y;
if y<miny then miny:=y;
end;
writeln(f2, (maxx-minx)*(maxy-miny));
close(f1); close(f2);

end.

Xin hã̃y giải thích giúp em ý nghĩa của các câu lệnh tô đậm trên.:confused:
 
Last edited by a moderator:
Top Bottom