Я МОГУ СКАЗАТЬ ТО ЧТО У НЕГО ЕСТЬ ВООБЩЕТО НЕ 1 ОШИБКА А 2 ОШИБОК))
Beginvar b:boolean; s:real;a:=0;writeln('slovo');readln(z);while not (eof(z)) do beginif z=d then a:=a+1;writeln(a);end;end.
3) В сообщении: "Привет, Володя" каждый символ записан в системе unicod. Вес одного символа 8 бит. Чему равен вес всего сообщения?
2) Каждый цвет записан 16 битами. Сколько всего цветов?