Получается как то так 1101000=104
2 раза выведет
будет выведено -10-9 (причем слитно)
Неверно написана переменная в 2),3) (нельзя использовать символы в названии переменной).
В 1),5) неправильно написан оператор присваивания. В 1 сначала должна идти переменная, в 5 перед = всегда ;
На Паскале
var a: array [1..5] of integer;
i: integer;
p, m: integer;
begin
for i:=1 to 5 do begin
readln(a[i]);
If a[i] < 0 then
m:= m+a[i]
else
p:=p+a[i];
end;
writeln(p/abs(m));
end.
Одним битом можно закодировать два цвета, обычно это черный и белый. Черный 0 - белый 1. У нас четыре цвета. Берем два бита и кодируем:
00 - черный
10 - темносерый
11 - белый
01- светлосерый
Итого двух бит достаточно