Решите на листочке, пожалуйста, от этого зависит поступление
невидно
Вторая задача на цикл с параметром var s,k:integer; begin s:=0; for k:=1 to 5 do s:=s+2*k; writeln ('сумма =', s); end. Первая задача нужна ?
Очень плохо видно значения внутри цикла