ХИБНІ:
1.Сьогодні було дуже спекотно.
2.Зараз я сплю.
3.Через 2 години буде Новий Рік.
ІСТИННІ:
1.Мене звати...
2.Зараз на дворі осінь.
3.Мій найулюбленіший предмет...
39 в десятично равно 100111 в двоичной,
39:2=19 остаток 1
19:2=9 остаток 1
9:2=4 остаток 1
4:2=2 остаток 0
2:2=1 остаток 0
И 1 в конце
И получается 100111 в двоичной
Программа для Pascal.
PROGRAM Z;
USES CRT;
VAR
A,B:INTEGER;
M:ARRAY[1..10] OF INTEGER;
BEGIN
CLRSCR;
WRITELN('VVEDITE ELEMENTY');
FOR A:=1 TO 10 DO READLN(M[A]);
WRITELN('CHETNIE ELEMNTY : ');
FOR A:=1 TO 10 DO IF A MOD 2 = 0 THEN WRITELN (M[A]);
READKEY
<span>END.</span>