При x, y, max : real в результате выполнения фрагмента программы max := -0.01; y := 4; x := -0.1; if x > max then y := max else begin y := x; x := max end; write (x, y);

martynova93    1   17.04.2019 04:50    3