Допустим ли следующий оператор присваивания? если да, то напишите тип и итоговое значение переменной y, если нет, то напишите, почему y: = round(y*(7 div 4) mod 7/3)/y - trunc(0.724)

Разберем оператор по шагам. обозначим т - промежуточный результат операции. y: = round(y*(7 div 4) mod 7/3)/y - trunc(0.724); 1) t: = 7 div 4 ⇒ t: =1, тип t целочисленный. 2) t: =y*t, тип т определяется типом y. 3) t: =t mod 7, в операции mod операнды могут быть только целочисленными, следовательно, тип у в 2) может быть только целочисленным, иначе мы получим на данном шаге ошибку. результат операции - т целочисленного типа. 4) t: =t/3; t - вещественного типа. 5) t; =round(t); t - целочисленного типа. 6) t: =t/y, t - вещественного типа. 7) trunc(0.724) вернет 0 целочисленного типа. 8) т: =t-0 не изменит значения и типа т: т по-прежнему остается вещественным. 9) y: =t; для корректного присваивания y должен иметь вещественный тип, но это, как указано в 3), вызовет ошибку при выполнении 2). итог: оператор недопустим и будет отмечен ошибочным при компиляции.

Var i : integer; begin   for i: =1 to 8 do writeln('x = ',i*2-1,'  y = ',sqr(i*2-1)-4); end.