uses crt;

var ln,x,i,n:integer;

begin

clrscr;

ln:=MAXINT;

readln(n);

for i:=1 to n do

begin

readln(x);

if ln<x then ln:=x;

end;

write(ln);

readln;

end.

Bài 4: 

a: \(A=\left(x-5\right)\left(2x+3\right)-2x\left(x-3\right)+x+7\)

\(=2x^2+3x-10x-15-2x^2+6x+x+7\)

=-8

Bài 4:

\(\Leftrightarrow n+1\in\left\{1;3\right\}\)

hay \(n\in\left\{0;2\right\}\)

\(\left(n+4\right)⋮\left(n+1\right)\Rightarrow\left(n+1\right)+3⋮\left(n+1\right)\)

\(\Rightarrow\left(n+1\right)\inƯ\left(3\right)=\left\{-3;-1;1;3\right\}\)

Mà \(n\in N\)

\(\Rightarrow n\in\left\{0;2\right\}\)

Bài 4

\(n+4⋮n+1\)

\(n+1+3⋮n+1\)

\(\Rightarrow3⋮n+1\)

\(\Rightarrow n+1\inƯ\left(3\right)\)

\(Ư\left(3\right)=\left\{1;3\right\}\)

\(\Rightarrow n\in\left\{0;2\right\}\)

https://meet.google.com/nrn-hism-wnj

24 ngày