решить по информатике var I,s: integer; begin s:=3; for i:=2 to 5 do s:=s+i; write (s) end

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку