Question

Допишите программу в Pascal и определите значения переменной Z после выполнения программы. Запишите на листочке чему равен z.
x := 5;
y := 24;
y := y - 2*x;
if (x > y) and (y < 0) then
z := x + y
else z:= x - y;

Answer 1

Ответ:

program Project2;

{$APPTYPE CONSOLE}

uses

 SysUtils;

   var y,x,z:integer;

   const

   a=25;

   b=7;

begin

 x := 5;

y := 24;

y := y - 2*x;

if (x > y) and (y < 0) then

z := x + y

else z:= x - y;

 write (z);

end.

Ответ:  -9

Объяснение: