Канал -а, мышка, тенор-д, логика -а, сервер-в, килобайт -з, графика -е, алфавит -ж
Д) 3 пер А,В,С. Порядок 3-1-2
3 столбец: 01111111, 4 ст. 01111111, 5ст 00110011
е) 3 пер, 1-3-2
А,В,С - как в д)
3 ст 00000011
4 ст 01010111
5 ст 10101000
Var i, byear, eyear, k : integer;
Begin
read(byear, eyear);
byear := byear + 1;
for i := byear to eyear do
if (i >= 1605) and ((i - 1605) mod 10 = 0) then k:= k +1;
writeln(k);
End.
Var
n, i, k: integer;
f: boolean;
begin
readln(n);
f := false;
for i := 1 to n do
begin
k := Random(100);
f := f or (k mod 4 = 0);
end;
writeln(f);
end.