Какое значение будет принимать переменная у после выполнения программы:
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
заполните таблицу до конца
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
заполните таблицу до конца
More Questions From This User See All
Answers & Comments
"x y Y=y*x
15 1 15"
Но у меня получилось вот такое вот число : 9720