Определите, что будет напечатано в результате работы следующей программы. (Каждый шаг алгоритма расписать, «как считали» и записать ответ).

Var s, k: integer;

Begin

s := 1;

for k := 1 to 4 do

s := s+2*k;

write (s);End.

​

рррр194    1   15.05.2020 18:55    1