Напишите программу:Сколько денег будет через 7 лет если в один банк положили сумму 2 500 000 под 5,5%, в другой банк положили 2 000 000 под 6%? Посчитать, где денег будет больше и на сколько

var s1,s2:real; i:integer; begin s1:=2500000; s2:=2000000; for i:=1 to 7 do begin s1:=s1+s1*5.5/100; s2:=s2+s2*6/100; end; writeln('s1 = ',s1:0:2,' s2 = ',s2:0:2); if s1>s2 then writeln('В первом банке денег будет больше на ',s1-s2:0:2) else writeln('Во втором банке денег будет больше на ',s2-s1:0:2); end. Результат: s1 = 3636697.90 s2 = 3007260.52 В первом банке денег будет больше на 629437.38