PASCAL
1. Напишите фрагмент программы ветвления: дано число а, если оно меньше 10, то увеличить в 2 раза, иначе уменьшить на 15.

2. Напишите фрагмент программы ветвления: даны числа a и b. Если a или (or) b кратно 3, то s:=2(a+b) иначе s:=a+b-ab, Вывести s.

Определим количество зрителей (мест):
35*40 = 1400

То есть нужно определить количество бит, которое требуется для кодирования 1400 номеров.

Для кодирования 1400 номеров требуется как минимум 11 бит. Разберемся, почему так:
С десяти бит мы можем закодировать максимум 1024 номера, т.к. 2^10 = 1024 (степень двойки - это количество бит). То есть десяти бит явно не достаточно для кодирования 1400 номеров.
Зато с одиннадцати бит мы можем закодировать 2^11=2048 номеров, и этого достаточно для кодирования 1400 номеров.

Один номер занимает 11 бит, объем 216 номеров равен:
216*11 = 2376 бит

ответ: 2376 бит.

   Смотря что Вы называете циклом. По установившейся терминологии любой цикл состоит из заголовка цикла (по строению которого циклы часто и именуют) и тела цикла. В языке паскаль в заголовке цикла с предусловием стоит ключевое слово while и ключевое слово цикла с параметром for стоять уже не может. Но в теле цикла, которое может иметь любое содержимое, цикл for, конечно же, может встречаться.
   А вот язык Алгол, на базе которого Н.Вирт сконструировал свой Паскаль, мог в заголовке цикла содержать очень много всего и, в том числе, смесь while с for:
for x:=p0 step h1 until q-1, q+1 step h2 until t, t+0.17 step h3 while cos(x/2)<0.85 do ...
Но Н.Вирт решил, что такой цикл неэффективен и... оставил от него жалкие ошметки. Возможно, компилятору "стало проще жить", но зато программисты в Паскале лишились возможности не только писать в цикле вещественные значения, но и вынуждены менять целочисленные только на 1 или -1.