15 пояснение в скрине так остальное в комментариях
Т.к. сообщение несет 4 бита, значит вероятность, что достали черную перчатку равна 1/16, т.к. 2^4 = 16
Получается, что белых перчаток 1/16 часть, а черных 15/16
Т.к. белых перчаток 30, и их 15/16 от общего количества, то черных перчаток в 15 раз меньше, то есть 30/15 = 2 пары
Складываем белые и черные, 30+2 = 32 пары.
Совокупность последовательных шагов, схема действий, приводящих к желаемому результату.
<span>//пример использования функции strlen
#include <iostream>
#include <cstring> // для strlen
<span>int main()
</span>{<span>
char input[256];</span><span>
std::cout << "Введите строку: ";</span><span>
std::cin >> input;</span><span>
std::cout << "Строка " << input << " содержит " << strlen(input) << " символов\n";</span><span>
return 0;</span><span>
}</span></span>
Значит так...очередная нудная программа с простым алгоритмом.
Печатает начальный массив, потом диагональ(в уже измененном массиве), потом новый массив, потом число элементов 19..59, произведение диагонали, сумму элементов столбца s.
program test;
uses crt;
var
arr:array[1..8,1..8] of integer;
i,j,cou,pr,s,sum:integer;
begin
clrscr;
randomize;
pr:=1;
s:=7;
for i:=1 to 8 do
begin
for j:=1 to 8 do
begin
arr[i,j]:=random(127)+2;
write(arr[i,j],' ');
end;
writeln;
end;
writeln;
for i:=1 to 8 do
for j:=1 to 8 do
begin
if (arr[i,j]>18) and (arr[i,j]<60) then
begin
cou:=cou+1;
arr[i,j]:=0;
end;
if i=j then
begin
pr:=pr+arr[i,j];
write(arr[i,j],' ');
end;
if j=s then
sum:=sum+arr[i,j];
end;
writeln;writeln;
for i:=1 to 8 do
begin
for j:=1 to 8 do
write(arr[i,j],' ');
writeln;
end;
writeln;
writeln(cou);
writeln(pr);
writeln(sum);
readln;
end.