Var
n: longint;
s: integer;
p: boolean;
begin
s:=0;
readln(n);
while n > 0 do
begin
if n mod 10 < 6 then
begin
inc(s, n mod 10);
p:=true;
end;
n := n div 10;
end;
if p = true then
writeln(s)
else
writeln('Нет');
end.<span>
</span>
<u>Колонки/наушники, звуковая карта, видеокарта. </u>
Устройства ввода/вывода(Микрофон, <span />Принтер, <span />Сканер<span />, Графический планшет, Веб камера,<span>Устройство для чтения оптических дисков </span>) по-сути нужны, но не обязательны.
Джойстик - устройство управления.
<span>Готовый кроссворд по информатике - на тему "Носители информации"</span>
Это значение, равное Истина или равное Ложь. Такие значения ты можешь сравнивать между собой, делать отрицание(не), логически складывать(или), умножать(и).
Вот скажем ты можешь ответить на вопрос Да или нет
Я сегодня встал в 7 утра и пил чай и мне было хорошо. Три события которые либо случились либо нет. Логическую величину такого выражения ты можешь вычислить.
110001.011100110011001100110011001100110011001100110011002