Program xxx; var n, s, k, c : integer; sa : real; begin write ('введите число n-'); readln (n); k: =0; s: =0; while n> 0 do begin c: = n mod 10; s: =s+c; k: =k+1; n: =n div 10 end; write ('сумма цифр = ', s); write ('количество цифр =', k); sa: =s/k; write ('среднее арифметическое =', sa) end.
Ответ дал: Гость
с cd-r информацию нельзя удалить, можно только добавить. с cd-rw- можно удалить.
Ответ дал: Гость
объем информации одного измерения будет равна 7 бит ();
станция сделала 8192 измерения - умножим на кол-во информации, необходимое для записи одного измерения: 8192*7=57344 бит=7168 байт = 7 килобайт
Популярные вопросы