Определите, что будет напечатано в результате работы следующей программы. (Каждый шаг алгоритма расписать, «как считали» и записать ответ). Var s, k: integer;
Begin
s := 1;
for k := 1 to 4 do
s := s+2*k;
write (s);End.
Begin
s := 1;
for k := 1 to 4 do
s := s+2*k;
write (s);End.
More Questions From This User See All