Определите результат выполнения команды для целочисленных x=10:
if x > 0 then
if x < 8 then y:= sqrt (x)
else y:= 2*x+1
else y:= 0;
writeln(y);

reginasachtova    1   13.04.2020 16:35    143