-
I. 8
-
,
, ,
1.
2. . . case
3. .
4. g (), m (), d ().
II.
1. 20 10
2.
3.
) a:=5; s:=6; while a<=9 do begin s:=s+a-1; inc(a) end; writeln(a, , s);
) a:=5; s:=6; while a<=9 do begin inc(a); s:=s+a-1 end; writeln(a, , s);
) a:=5; s:=6; while a<=9 do inc(a); s:=s+a-1; writeln(a, , s);
) a:=5; s:=6; while a<=9 do s:=s+a-1; inc(a); writeln(a, , s);
2. (1,2,3,4) ,
| I ? 1)a:=5; s:=6; while a<=9 do begin s:=s+a-1; inc(a) end; writeln(a, , s); 2)a:=5; s:=6; while a<=9 do begin inc(a); s:=s+a-1 end; writeln(a, , s); 3)a:=5; s:=6; while a<=9 do inc(a); s:=s+a-1; writeln(a, , s); 4)a:=5; s:=6; while a<=9 do s:=s+a-1; inc(a); writeln(a, , s); , 3 | II ? 1)b:=3; a:=5; while b<=9 do begin a:=a+b+2; inc(b) end; writeln(b, , a); 2)b:=3; a:=5; while b<=9 do begin inc(b); a:=a+b+2 end; writeln(b, , a); 3)b:=3; a:=5; while b<=9 do inc(b); a:=a+b+2; writeln(b, , a); 4)b:=3; a:=5; while b<=9 do a:=a+b+2; inc(b); writeln(b, , a); , 5 | III ? 1)q:=5; d:=1; while q>0 do begin d:=d+q; dec(q) end; writeln(q, , d); 2)q:=5; d:=1; while q>0 do begin dec(q); d:=d+q end; writeln(q, , d); 3)q:=5; d:=1; while q>0 do dec(q); d:=d+q; writeln(q, , d); 4)q:=5; d:=1; while q>0 do d:=d+q; dec(q); writeln(q, , d); , 3 15 255 | IV ? 1)p:=2; u:=6; while p<=6 do begin u:=u+p-2; inc(p) end; writeln(p, , u); 2)p:=2; u:=6; while p<=6 do begin inc(p); u:=u+p-2 end; writeln(p, , u); 3)p:=2; u:=6; while p<=6 do inc(p); u:=u+p-2; writeln(p, , u); 4)p:=2; u:=6; while p<=6 do u:=u+p-2; inc(p); writeln(p, , u); , 4 5 111 | V ? 1)t:=20; r:=11; while t>=15 do begin r:=r+t-1; dec(t) end; writeln(t, , r); 2)t:=20; r:=11; while t>=15 do begin dec(t); r:=r+t-1 end; writeln(t, , r); 3)t:=20; r:=11; while t>=15 do dec(t); r:=r+t-1; writeln(t, , r); 4)t:=20; r:=11; while t>=15 do r:=r+t-1; dec(t); writeln(t, , r); , 11 |
| VI ? 1)x:=2; v:=6; while x<=5 do begin v:=v+x; inc(x) end; writeln(x, , v); 2)x:=2; v:=6; while x<=5 do begin inc(x); v:=v+x end; writeln(x, , v); 3)x:=2; v:=6; while x<=5 do inc(x); v:=v+x; writeln(x, , v); 4)x:=2; v:=6; while x<=5 do v:=v+x; inc(x); writeln(x, , v); , 5 7 222 | VII ? 1)g:=7; y:=6; while g>4 do begin y:=y+g+3; dec(g) end; writeln(g, , y); 2)g:=7; y:=6; while g>4 do begin dec(g); y:=y+g+3 end; writeln(g, , y); 3)g:=7; y:=6; while g>4 do dec(g); y:=y+g+3; writeln(g, , y); 4)g:=7; y:=6; while g>4 do y:=y+g+3; dec(g); writeln(g, , y); , 33 40 1011 | VIII ? 1)r:=1; j:=2; while r<=4 do begin j:=j*r+1; inc(r) end; writeln(r, , j); 2)r:=1; j:=2; while r<=4 do begin inc(r); j:=j*r+1 end; writeln(r, , j); 3)r:=1; j:=2; while r<=4 do inc(r); j:=j*r+1; writeln(r, , j); 4)r:=1; j:=2; while r<=4 do j:=j*r+1; inc(r); writeln(r, , j); , 2 3 456 | IX ? 1)m:=34; b:=3; while m>=31 do begin b:=b-m; dec(m) end; writeln(m, , b); 2)m:=34; b:=3; while m>=31 do begin dec(m); b:=b-m end; writeln(m, , b); 3)m:=34; b:=3; while m>=31 do dec(m); b:=b-m; writeln(m, , b); 4)m:=34; b:=3; while m>=31 do b:=b-m; dec(m); writeln(m, , b); , 8 99 7766 | X ? 1)f:=15; h:=6; while f>=9 do begin h:=h+f-4; dec(f) end; writeln(f, , h); 2)f:=15; h:=6; while f>=9 do begin dec(f); h:=h+f-4 end; writeln(f, , h); 3)f:=15; h:=6; while f>=9 do dec(f); h:=h+f-4; writeln(f, , h); 4)f:=15; h:=6; while f>=9 do h:=h+f-4; dec(f); writeln(f, , h); , 11 22 333 |
| XI ? 1)z:=7; p:=-2; while z<=11 do begin p:=p+z+2; inc(z) end; writeln(z, , p); 2)z:=7; p:=-2; while z<=11 do begin inc(z); p:=p+z+2 end; writeln(z, , p); 3)z:=7; p:=-2; while z<=11 do inc(z); p:=p+z+2; writeln(z, , p); 4)z:=7; p:=-2; while z<=11 do p:=p+z+2; inc(z); writeln(z, , p); , 13 56 7655 | XII ? 1)e:=3; w:=9; while e<=6 do begin w:=w+e-5; inc(e) end; writeln(e, , w); 2)e:=3; w:=9; while e<=6 do begin inc(e); w:=w+e-5 end; writeln(e, , w); 3)e:=3; w:=9; while e<=6 do inc(e); w:=w+e-5; writeln(e, , w); 4)e:=3; w:=9; while e<=6 do w:=w+e-5; inc(e); writeln(e, , w); , 9 102 5000 | XIII ? 1)d:=-4; k:=d+5; while d<=1 do begin k:=k+d+3; inc(d) end; writeln(d, , k); 2)d:=-4; k:=d+5; while d<=1 do begin inc(d); k:=k+d+3 end; writeln(d, , k); 3)d:=-4; k:=d+5; while d<=1 do inc(d); k:=k+d+3; writeln(d, , k); 4)d:=-4; k:=d+5; while d<=1 do k:=k+d+3; inc(d); writeln(d, , k); , 15 14 3498 | XIV ? 1)x1:=7; x2:=x1*2; while x1<=10 do begin x2:=x2+x1-1; inc(x1) end; writeln(x1, , x2); 2)x1:=7; x2:=x1*2; while x1<=10 do begin inc(x1); x2:=x2+x1-1 end; writeln(x1, , x2); 3)x1:=7; x2:=x1*2; while x1<=10 do inc(x1); x2:=x2+x1-1; writeln(x1, , x2); 4)x1:=7; x2:=x1*2; while x1<=10 do x2:=x2+x1-1; inc(x1); writeln(x1, , x2); , 17 65 10000 | XV ? 1)v:=1; w:=2; while v<=6 do begin w:=w+v*2; inc(v) end; writeln(v, , w); 2)v:=1; w:=2; while v<=6 do begin inc(v); w:=w+v*2 end; writeln(v, , w); 3)v:=1; w:=2; while v<=6 do inc(v); w:=w+v*2; writeln(v, , w); 4)v:=1; w:=2; while v<=6 do w:=w+v*2; inc(v); writeln(v, , w); , 6 66 6666 |
|
|
|
|
|
|
