Вычислите значение переменной d после выполнения фрагмента программы на языке программирования turbo pascal: a : = 3; b : = 2; c : = 5; d : = 7; if a – b < 0 then if d < c then if d < 0 then a : = b else else a : = d else d : = c; ,как это сделать в турбо паскале? (

Program Valerya;
uses CRT;
car a, b, c, d:integer;
begin
a := 3;
b := 2;
c := 5;
d := 7;
if a – b < 0
then if d < c
then if d < 0
then a := b
else
else a := d
else d := c;
writeln(d);
end.
это программа.
а значение d=5