В тетради нарисовать блок схему инаписать программу (подробно)
Подробно это как?
Просто распишите что дальше
Лучше фото
Какие-нибудь пояснения нужны?
Ответ:
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.
Объяснение:
Смотри картинку