Нужно больше шакалов. Я точно вижу то, что под а(и под с если я вижу) неправильно. Остальное как-то не уместилось видимо
Запах, зрение, вкус, ощупь(дотик укр.), звук
№1
var a, b, k, i:integer;
begin
k:=0;
readln(a);
for i:=1 to 9 do begin
readln(b);
if a=b then k:=k+1;
end;
writeln('Ответ:', k);
end.
№2
var a, k, i:integer;
begin
k:=0;
for i:=1 to 12 do begin
readln(a);
if a mod 5=0 then k:=k+1;
end;
writeln('Ответ:', k);
end.
подсчитаем кол-во символов в тексте - 18
на кодирование одного символа идет 1 байт, а на кодирование всего текста-18 байт
выразим 18 байт в битах, умножив на 8, -получим 144 бита
Название устройства оусущ. Связь меж компьютерами