#include <iostream>
using namespace std;
int main()
{<span>
int x, y, counter = 0;</span>
<span> setlocale(LC_ALL, "Russian");</span>
<span> cout << "Введите число X: ";
</span><span> cin >> x;
</span><span> cout << "Введите число Y: ";
</span><span> cin >> y;</span>
<span> for (int i = x; i <= y; i++)</span><span> {
</span><span> if (i % 8 == 0) {
</span><span> counter++;</span><span> cout << i << endl;</span><span>
}
</span><span> }</span>
<span> cout << "Чисел, которые кратны 8 = " << counter << endl;</span>
<span> system("pause");
</span><span> return 0;
</span><span>}</span>
1)5*8=40(Белка и доставка 2)
2)7*6=42(Олень и доставка 3)
3)7*6=42(Крот и доставка 4)
4)6*7=42(Медведь и доставка 5)
5)3*8=24(Бобер и доставка 1)
Ответ:190
Ладно, раз все эти нюансы не важны, то вот так:
program Project1;
var
x,y, d: real;
begin
write(' Enter X:');
readln(x);
write('Enter Y:');
readln(y);
d:= ((abs(x)-abs(y)))/((1+abs(x*y)));
writeln(d:0:5);
readln;
end.
НЕ (X < 2), следовательно, X >= 2
НЕ (X > 10), следовательно, X < 10
И оба эти условия должны выполняться одновременно.
X >= 2 и X < 10, наименьшее число: 2
Ответ: 2.
Const n=21;
var q:array[1..n] of integer;
i,s,k:integer;
begin
Randomize;
for i:=1 to n do
begin
q[i]:=random(51)-10;
write(q[i]:4);
end;
writeln;
k:=0; s:=0;
for i:=1 to n do
if q[i]<0 then begin s:=s+q[i]; k:=k+1; end;
writeln('Среднее арифметическое отрицательных элементов = ',s/k);
end.
Пример:
16 -1 -7 5 13 11 -2 -10 36 19 3 34 23 29 12 28 9 39 33 16 -6
Среднее арифметическое отрицательных элементов = -5.2