Определить значения переменных S1, которое получается в результате выполнения следующего алгоритма при a=1 и b=3:
Var s1,s2,a,b: integer; i: integer;begin s1:=0; s2:=0; a:=1; b:=3; for i:=a to b do begin if i mod 2=0 then s2:=s2+i*i else s1:=s1+i; end; s1:=s1+s2; writeln(s1);end Получится число 8, если выполним все алгоритмы.
А можно пожалуйста объяснить более подробно? Всё равно немного не понимаю