11+7+1=19 клубков
она может вытащить 11 синих клубков и 7 зеленых но если она вытащит еще один клубок. то ОБЯЗАТЕЛЬНО вытащит 1 клубок красной шерсти
<span>архитектура </span>компьютерных сетей – это группа компьютеров, соединенных между собой линиями связи при помощи специальной аппаратуры и управляемая специальными программами, обеспечивающими обмен информацией и совместное использование ресурсов – аппаратных, программных и информационных.
Var
A,B,C:real;
Begin
Write('A = ');ReadLn(A);
Write('B = ');ReadLn(B);
Write('C = ');ReadLn(C);
if A>B then
Begin
if A>C then A:=A/3
else C:=C/3;
if B<C then B:=B*3
else C:=C*3
End
else
Begin
if B>C then B:=B/3
else C:=C/3;
if A<C then A:=A*3
else C:=C*3
End;
WriteLn;
WriteLn('A = ',A);
WriteLn('B = ',B);
WriteLn('C = ',C);
End.
Ответ:
791 Кбайт, 1582 Кбайта
Объяснение:
150 × 80 × 60 = 810000 символов.
В КОИ-8 символ занимает 1 байт, поэтому объем 810000 байт =
810000/1024 ≈ 791 Кбайт
В Unicode символ занимает 2 байта, объем будет 791 × 2 = 1582 Кбайта
<u>// PascalABC.NET 3.2, сборка 1467 от 02.06.2017</u>
<u>// Внимание! Если программа не работает, обновите версию!</u>
begin
ReadlnString('Вводите:').ToWords.Where(w->(w.Length).IsOdd)
.Where(w->w.Right(2)='ая').Println
end.