Чему равно значение S?
s:=0; for i:=5 downto 1 do
s:=s+2*i;

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