program primer;
Var a,b,c:integer;
begin
a:=14;
b:=9;
c:=6;
if (a-b)>c then
a:=b-c
else
a:=c-b;
write(a);
end.
Объяснение:
По сути всё просто - вводим значения типа integer, потом присваиваем значения и проходим условие, в итоге получаем -3. Так как 14-9=5, 5 не больше 6, значит а=6-9
program primer;
Var a,b,c:integer;
begin
a:=14;
b:=9;
c:=6;
if (a-b)>c then
a:=b-c
else
a:=c-b;
write(a);
end.
Объяснение:
По сути всё просто - вводим значения типа integer, потом присваиваем значения и проходим условие, в итоге получаем -3. Так как 14-9=5, 5 не больше 6, значит а=6-9