3)
C:\информатика\рисунки\часть2\урок2.<span>doc</span>
<span>__________________________________</span>
1) 2160/270=8 бит (весит 1 символ)
2) 2 в 8 степени =256 (формула N=2 в степени i)
Program n_10;
var a,b,c,x: integer; R:Boolean;
begin
WriteLn('Введите трехзначное число>>');
ReadLn(x);
a:=x div 1000;
b:= (x mod 1000) div 100;
c:=x mod 10;
R:= (a*b*c) mod 2 = 0;
WriteLn('Произведение цифр четно?',R)
end.