Москва - Толя, Санкт-Петербург - Витя, Новгород - Юра, Пермь - Коля, Томск - Алёша.
Всего дискет 8. какой бы не была дискета с инфой, информация об этом весит одинаково
8 = 2^3 т.е. 3бита
Ответ а: 1001
ответ б: 1130
ответ в: 03732
// PascalABC.NET 3.1, сборка 1219 от 16.04.2016
function SoD(n:int64):integer;
begin
Result:=0;
while n>0 do begin
Result+=n mod 10;
n:=n div 10
end
end;
begin
var a:=ReadArrInteger('Введите три натуральных числа:',3);
Write('Суммы цифр чисел: '); a.Select(x->SoD(x)).Println;
Writeln('Общая сумма цифр всех чисел: ',a.Select(x->SoD(x)).Sum)
end.
<u><em>Тестовое решение:</em></u>
Введите три натуральных числа: 56325 23131 784545223
Суммы цифр чисел: 21 10 40
Общая сумма цифр всех чисел: 71
Перебои все элементы массива, а потом через "%/2" проверку сделай. Воаля.