Определить значения переменных S1, которое получается в результате выполнения следующего алгоритма при a=1 и b=3
В результате выполнения программы по данному алгоритму, получится 8 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.
