Что выведут на экран следующие фрагменты программы? Приведите этапы решения пожалуйста: 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.
Ответ:
4
Объяснение:
Цикл выполняется 4 раз и всегда (i mod 10) = 1 и s возрастает от 0 до 4......