В каком из операторов цикла допущена ошибка?

ответ: а)

В первом цикле выполнится только первая строчка, благодаря синтаксису Паскаля. Чтобы выполнилась и вторая, нужно после do написать begin и в конце end; .

Ошибка в В s:=s*i вотак мама ка лутшая

2 = 2^1

8 = 2^3

это значит, что в двоичной системе определяющим является 1 цифра, а в 8-ричной - 3 цифры; разбиваем 2-ичную сис на группы по три числа, и переводим их в другую систему. например в первом будут группы чисел 100, 010,   010, 110; (разбивается с конца, исключаем возможность ошибки) 100 это 4 и т д..

var x1,x2,x3,x4,x5: integer;

s: real;

begin

  read(x1,x2,x3,x4,x5);

  s: = (x1+x2+x3)/(x4+x5);

  if round(s)=s then writeln("celoe - "s);

end.