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