Дан программный код. Определите результат выполнения программы. ​

p = 1

в цикле x принимает целые значения на промежутке: [-2;2) имеем:

1 - 2 - 1 + 0 + 1 после завершения цикла, что, в свою очередь, равно -1

ответ: -1

290*39*67=757770 - всего символов

для кодирования  757770 символов потребуется   757770 байтов

757770байт < 1,44    мбайт

да, книга поместиться на дискетку

var i,s: integer;

begin

writeln('summa ');

for i: =100 to 999 do

if i mod 17 =0 then s: =s+i else s: =s+0;

writeln(s)

end.