Нарисовать блок схему и составить программу паскаль.
x^2-3,если x<5, z= 11x-4,если x>=5
Answers & Comments
Vetalbox95
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.
Answers & Comments
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.