Какое значение будет принимать переменная у после выполнения программы:
Var x, y:integer;
Begin
y:=1 ; x:=15
repeat
y:=y*x;
x:=x-3
until x<5;
Writeln ( y= ,y);
End
x y Y=y*x
15 1 15
заполните таблицу до конца
Не знаю что за :
"x y Y=y*x
15 1 15"
Но у меня получилось вот такое вот число : 9720
Оцени ответ
