Program nhogdenie_z;
uses crt;
var x,z:integer;
begin
writeln(Введите x);
readln(x);
if x<5 then
begin
z:=(x^2)-3;
writeln( Z = ,z);
end;
else
Begin
z:=11*x-4;
writeln(Z = ,z);
end;
readkey;
end.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.