Написать программу на паскале: определить является ли год високосном

var a: integer; begin readln(a); if(a mod 4 = 0) and (a mod 100 < > 0) or (a mod 400 = 0) then writeln('год високосный') else writeln('год не високосный'); end.

1)сколько бит информации несет сообщение о том,что занятия состоятся в одной из 36 аудиторий? диапазон 0-35 ,   2 в ст 6 > 35   ответ : 6 бит 2) какое число следует за каждым из данных: (а) 667(внизу 8) (б) 101(внизу 2) нечетное, вполне себе ответ.3) выполните арифметические операции: (а)11010110(внизу 2) + 1111001(внизу 2)  (б) 1110(внизу 2) * 1001(внизу 2) (в) 1100011(внизу 2) - 11111(внизу 2)     нужно делать столбиком как с обычными числами, только высший разряд увеличивать при переполнении текущего разряда большего чем 1.

                                    животные и растения !                                                           наш мир удивителен . в   нём есть   много различных и    разнообразных растений и животных .   например   животные : кошки , собаки ,  олени, тигры, львы, гиены .    растении : дурман, волчье лыко ,  жасмин,   роза ,ромашка .  и   ещё грибы тоже   относятся к растениям . например : белёна ,  бледная поганка, мухомор . в нашем мире полно загадок и чудес.