Определите, что будет напечатано в результате работы следующей программы:

Var s,k integer;

Begin

s:=0;

for k:=3 to 8 do s:=(s+3)*k;

write(s);

End.

P.S. Желательно подробно.

Var s,k integer; //обозначили переменные.Тип  integer говорит что это целые числа.Begins:=0; //Присваеваем s значение 0.Тоесть s у нас в начале программы ровно нулю.

for k:=3 to 8 do s:=(s+3)*k; //Тут k присваеваем значение 3.Поэтому, от 3 до 8 делаем " s:=(s+3)*k".Тоесть (8-3=5) 5 раз выполняем  s:=(s+3)*k.Пишу ход выполения программы:s:=(0+3)*3=9 // тут значение  s стало ровно 9.s:=(9+3)*3=12*3=36  // тут значение  s стало ровно 36. И так далее.s:=(36+3)*3=39*3=39*3=117s:=(117+3)*3=120*3=360s:=(360+3)*3=363*3=1089write(s); // выводим значение рассчитанной s.End. // конец программы.