Определите значение переменных s и i после выполнения фрагментов программы:

1) s:=1;
n:=5;
for:=1 to n do s:=s*i;

2) s:=1;
n:=2;
for i:=1 to 3 do s:=s+1/n;
n:=n+3;

3) s:=0;
i:=3;
repeat
s:=s+5 div i;
i:=i-1;
until i<1;
​

volkovaolga75    1   16.05.2020 15:55    1