Проанализируйте работу программы. Program m_1; Var X, Y: integer; Begin X := 1; Y := 1; While X < 5 do Begin Y := Y*2; X := X+1; End; End. Какое значение примет Y после завершения программы?
Ответ:
Y:=2
X:=2
Объяснение:
Y:=2 X:2 вот так потому-то я рассчитал удачи вам )