Begin
writeln (' .--I"""""""""":');
writeln (' / - I..............\');
writeln ('"-O-""""""O"O""-');
end.
1.Сообщения, осведомляющие о положении дел, о состоянии чего-н.
Var
A,B:integer;
Begin
Write('Введите два числа: ');ReadLn(A,B);
if A<B then Write(A)
else Write(B)
End.
Общее количество клеток = 9*9 = 81
Вероятность попасть в желтый однопалубный корабль = 7/81
Вероятность попасть в красный однопалубный корабль = 49/81
Вероятность потопить корабль = 7/81*0,27 + 49/81*0,40 = 0,265
В процентах: 26
120 символов - 75 байт, следовательно 1 символ - 75*8/120=5 бит
тогда количество символов в алфавите N<u />