Дан текст решения
| PascalABC |
Ожидаемый ответ |
var n,m1,m2,i,a: integer;
begin
readln(n);
m1:=-1;
m2:=-2;
for i:=1 to n do
begin
read(a);
if a > m1 then
begin
m2:=m1;
m1:=a;
end;
if (a < m1) and (m2 < a) then
m2:=a;
end;
writeln(m2);
|
|
Напишите аналогичный код на C++