Question

1) Какое значение будет принимать переменная Y после выполнения фрагментов программы? a) Var Y, X: integer; Begin Y: = 1; X: = 12; Repeat Y: = Y*X; X: = X – 2; Until X<7; Writeln (‘Y=’,Y); End. б) Var Y, X: integer; Begin Y: = 1; X: = 16; Repeat Y: = X*X; X: = X – 4; Until X<=0; Writeln (‘Y=’,Y); End. 2) Определить значение переменной у после выполнения фрагмента следующей программы: Var y:real; i:integer; begin y:= 1; i:= 2; repeat i:=3*i; y:=y+i until i > 7; Writeln ('y=',y); End.

Answer 1

Ответ:

а) y =960

б) y=16

2  у = 25

Объяснение:

а)

y=1

x=12

y=12

x=10

y=960

x=6 ( х стал меньше 7, значит выводим строку с "y")

б)

y=1

x=16

y=256

x=12

y=144

x=8

y=64

x=4

y=16

x=0

тут х =0 а значит выводи строку с y

2.

y = 1

i=2

y=7

i=6

i=18

y=25

тут y стал больше 7, значит выводи строку с y

Answer 2

Ответ:1542

Объяснение:

Answer 3

1) В первом фрагменте программы переменная Y будет иметь значение 4097. - В начале Y инициализируется значением 1, а X - значением 12. - Затем в цикле Repeat происходит умножение Y на X и присваивание нового значения Y, а также уменьшение X на 2. - Цикл Repeat продолжается, пока X меньше 7. - После выполнения цикла Repeat значение Y будет равно 4097. - Затем программа выводит на экран "Y=4097". 2) Во втором фрагменте программы переменная Y будет иметь значение 273. - В начале Y инициализируется значением 1, а X - значением 16. - Затем в цикле Repeat происходит прибавление к Y квадрата значения X и присваивание нового значения Y, а также уменьшение X на 4. - Цикл Repeat продолжается, пока X меньше или равно 0. - После выполнения цикла Repeat значение Y будет равно 273. - Затем программа выводит на экран "Y=273". 3) В третьем фрагменте программы переменная Y будет иметь значение 15. - В начале Y инициализируется значением 1, а i - значением 2. - Затем в цикле Repeat происходит умножение i на 3 и присваивание нового значения i, а также прибавление к Y значения i. - Цикл Repeat продолжается, пока i больше 7. - После выполнения цикла Repeat значение Y будет равно 15. - Затем программа выводит на экран "Y=15".