В 11 строке точку с запятой поставль
сама же ошибка означает то, что синтаксис неверный
expected = ожидалось
//PascalABC.NET 3.2 сборка 1318
Var
ar:array of integer;
i,n,min,k:integer;
begin
readln(n);
setlength(ar,n);
min:=integer.MaxValue;
for i:=0 to n-1 do
begin
readln(ar[i]);
if min>ar[i] then min:=ar[i];
end;
for i:=0 to n-1 do
if ar[i]=min then inc(k);
writeln(k);
end.
Пример ввода:
3
1
2
1
Пример вывода:
2
До двадцяти п'яти додати різницю чисел тринадцяти відняти сім і поділити на два.
Источник информации
приемник информации
электронная почта
<span>7 больших желтых яблок
все груши большие значит яблок больших 32-17=15
всего плодов 25+17=42 из них 28 желтых значит зеленых 42-28=14
зеленых яблок на 2 больше чем зеленых груш значит яблок зеленых 8 а груш 6
зеленые яблоки все большие значит 15-8=7
ответ 7</span>