1. 3*64=192 символа в сообщении
3/64Кб=3/64*8*1024бит=384 бита
384/192=2бита весит один символ
2²=4символа в алфавите
2. 2³=8подъездов
Хм..
-23 при условии, что a/k-b, а не a/(k-b)
если учесть условие a/(k-b), то -35
Ответ:
Никак не зависит
Объяснение:
В программе может быть любое количество функций (или процедур) и любое количество переменных
<h3>PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a := ArrRandom(20, -50, 50);
a.Println;
var b := a.Sum;
Println('Сумма элементов равна', b)
end.
Цикл for k:=1 to 10 do проверяет каждый элемент массива dat.
В теле цикла условие - if dat[k] = 15 then m:=m+1
Переводя на русский язык - ЕСЛИ элемент массива = 15 ТО прибавляем к m единицу.
То есть m - количество элементов массива, значение которых равно 15.
Всего таких элементов три (dat[2], dat[4], dat[10]). То есть программа выведет на экран тройку.