Var
sum, x : integer;
begin
sum := 0;
repeat
read (x);
if (x mod 6 = 0) and (x mod 10 = 2) then sum := sum + x;
until x = 0;
write (sum);
end.
1 байт = 8 бит
128 000 бит делим на 8 = 16000 байт/сек.
Дальше
1 Кб = 1024 байта
250 Кб х 1024 байта = 256 000 байт
Делим их на скорость (16 000 байт за сек)
и получаем 256000/16000 = 16 сек.
Ответ:
Для задач с условием. Проверяется истинность данного условия.
Наличие источника и приемника информации и канала связи между ними
Cначало умножаем a с х и 2 a*x*2 -> 5*(-5)*2=-50
затем умножаем b на x b*x -> 9*(-5)=-45
и плюсуем все -50+(-45)+12=-95+12=-83