Question

В тетради нарисовать блок схему инаписать программу (подробно)

Answer 1

Ответ:

program z1;

var a,z: integer;

begin

write ('a = ');

read (a);

if  a > 2 then z := a + a * a * 2

else z := 7 - sqr(a) * a;

write ('z = ',z)

end.

Объяснение:

Смотри картинку