Число делится на 5 тогда, когда последняя цифра делится на 5, т.е. если она 0 или 5
1) нарисовать 1 большой круг
2) отступив 5 миллиметров и сделать второй круг
3) примерно по середине разделить воображаемой линией
4) отступив от линии одинаковое пространство, нарисовать маленькие кружки
5) раскрасить
64=2⁶ (6 бит на 1 символ)
6*80=480
Ответ: 480 бит
var x, L, M: integer;
begin
readln(x);
L := 0;
M := 0;
while x > 0 do
begin
L := L + 1;
if x mod 2 = 0 then
M := M + (x mod 10) div 2;
x := x div 10;
end;
writeln(L);
writeln(M);
end.
Шумовое загрязнение, влияние компьютера на человека.