Что выведут на экран следующие фрагменты программы? Приведите этапы решения пожалуйста:
Program p3B;
var i,s:integer;
begin
i:=15; s:=0;
repeat
s:=s+ i mod 10 ; i:=i+1;
until i<20;
writeln (s);
end.