Ответ:
-8
Объяснение:
Составим уравнение
(((11 + 5) / d) + 5 + 5) / d = -1
16 = -d² - 10d
d² + 10d + 16 = 0
d₁ = 2 d₂ = -8
По условию d < -5
d = -8
Проверка:
11 + 5 = 16
16 / -8 = -2
-2 + 5 = 3
3 + 5 = 8
8 / -8 = -1
Var s:string;
i,a:longint;
begin
readln(s);
for i:=1 to length(s) do
if (s[i]='-') or (s[i]='*') or (s[i]='/') or (s[i]=',') then
inc(a);
writeln(a);
<span>end.</span>
Const n = 5;
m = 5;
var a:array[1..n,1..m] of integer;
i,j,k:integer;
begin
//Для теста заполним массив n * m сл.числами и
//определяем количество нечетных
for i:=1 to n do begin
for j:=1 to m do begin
a[i,j]:=random(21)-10; write(a[i,j]:4);
if a[i,j] mod 2<>0 then k:=k+1;
end;
writeln;
end;
writeln('Нечетных в массиве: ',k);