Задание:
Нарисовать блок схему и составить программу паскаль.x^2-3, если x<5,z=11x-4, если x>=5
Решение:
Program nhogdenie_z; uses crt; var x,z: integer; beginwriteln ('Введите x'); readln (x); if x<5 thenbegin z: =(x^2) -3; writeln (' Z=',z); end; else Beginz: =11*x-4; writeln ('Z=',z); end; readkey; end.
Знаете другой ответ?