1.сколько раз будет выполнен oператop write? var i,j,s: intrger; begin s: =0; for i: =15 to 18 do begin s: s+1; write(i: 4,s: 5); end; end. 2.чему будет равно s после выполнения программы. var i,n,k,s,a: integer; begin s: =0; fo4 i: 4 to 8 do if i mod 4=0 then s: ==s+i; writeln(s); end. нужны трессировочные таблицы
2. Значение S будет равно 12
Трассировочные таблицы - во вложении