1. Условие задания:
Что получится в результате работы фрагмента программы?
m:=17;
for i:=1 to 7 do
m:=m-6;
writeln (m);
2.
Условие задания:
Что получится в результате работы фрагмента программы?
a:=0.1;
s:=0;
repeat i:=I+1;b:=1/i;
s:=s+a;
until b<a;
write(I)
3.
Условие задания:
Что получится в результате работы фрагмента программы