Какое значение примет переменная Y после выполнения программы? Var Y,X: integer; Y:=2; X=17; Repeat Y:=Y*x X=X-2; Until x<2 Writeln ('Y=',Y); End.

myrzik5293p081ps    3   07.05.2020 14:24    1