Запишите значение переменной f, полученное в результате работы следующей программы. Var...

Question

Запишите значение переменной f, полученное в результате работы следующей программы. Var f,n: integer;Beginf:= 4;f:= f*3;For n := 1 to 4 dof := f+n;Writeln(f) ;End. Выберете правельный ответ:а) 16б) 48в) 22г) 24​

Answer 1

Ответ:

в) 22

Объяснение:

Var f,n: integer;

Begin

f:= 4;

f:= f*3;

// f = 4*3 = 12

For n := 1 to 4 do

f := f+n;

//Выполняется цикл для значений n от 1 до 4

//n = 1: f = 12 + 1 = 13

//n = 2: f = 13 + 2 = 15

//n = 3: f = 15 + 3 = 18

//n = 4: f = 18 + 4 = 22

Writeln(f) ;

// f = 22

End.