<u>PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
<u>№1</u>
begin
var (a,b,c):=ReadReal3('Введите три числа через пробел:');
Writeln('Максимальное число ',Max(a,Max(b,c)))
end.
<u>№2</u>
begin
var (a,b):=ReadInteger2('Введите две оценки через пробел:');
if a+b>=9 then Writeln('Молодец!')
else Writeln('Подтянись!')
end.
P = a + b + с т.е.сумма длин всех его сторон(из 3)!!)))
Шаг n m результат
8*2 15 8 15>2
15*2 14 15 14>2
14*2 13 28 13>2
и дальше до 2=2 (вроде так)
64 символа => 2^6=64 => 6 бит/символ 7200 байт = 7200*8 = 57600 бит 57600/6=9600 символов в сообщении 9600/4/40=60 символов в строке.
<span>5) 4096 бит.
0.5 килобайт = 512 байт.
1 байт = 8 бит
512 байт = 4096 бит</span>