//Pascal ABC.NET v3.0 сборка 1111
var
a,k,s:integer;
begin
readln(k); //вводим k
a:=0;
s:=0;
while a>=0 do //пока а >=0
begin;
if a>k then s:=s+a; //если a>k, тогда добавляем к s
readln(a); //каждый раз вводим в a
end;
writeln(s); //выводим s
<span>end.
Пример ввода:
45
34
56
67
<span>-2
Пример вывода:
123</span></span>
1) N=2^i i-бит/1 символ N - символов в алфавите
N=56 i=6 6*132 бит в сообщении
(6*132)/8=99 байт
Ответ 99 байт
2) i = (24*8)/48=4
N=2^i=2^4=16 символов в алфавите
Ответ 16 символов
3) 2^i=75
i=7
Ответ 7 лампочек
4) N=18-(-14)=32 +1=33 (включая 0)
i=6 бит/1измер
6*144=864 бит или 108 байт
3 задание ответы:1,3,4,5
4 задание карандаш и граффити
При использовании 1024-х цветовой палитры для хранения 1 точки необходимо log(2)1024 = 10 бит.
Для всего изображения - 900*180*10 бит = 900*180*10/8 байт = 202500 байт =
202500/1024 Кбайт ≈ 198 Кбайт