Question

Решительно пожалуйста , 2 и 3
Пример 1
Var, x,y,z (var x,y,z :read)
Varx, y,z,a ;real
begin
write ('введите x = ')
Read(x)
Write ( введите y =')
Read (y)
Write (введите z =')
Read (z)
a:=(x+y-4)/ (x •x+2)
Ответ: a:=(x+y-z) / (x•x+2)