1) 22
2) 18
3) -21
4) 12.0
5) 4 (себебі z- ті шыѓару керек)
6) 11
7) 45
8) 24
9) 2
10) 6
11) 8
12) 40 120
22; write(z); end. 21 23 37 19 " width="640"
Какое число получится после
выполнения программы,
если ввести число 9?
var x:integer; y, z:real;
begin
readln(x); z:=1;
Repeat
y:=2*sqrt(x); z:=3*y+z;
Until z22;
write(z);
end.
21
23
37
19
Егер 6 саны енгізілсе, бұл бағдарламаны
орындағанда қандай сан шығады?
var x, y, i: integer;
begin
readln(x);
y:=x div 2;
For i:=3 to y do
x:=x+2; y:=x+1;
write(x);
end.
- var x, y, i: integer; begin readln(x); y:=x div 2; For i:=3 to y do x:=x+2; y:=x+1; write(x); end.
- var x, y, i: integer; begin readln(x); y:=x div 2; For i:=3 to y do x:=x+2; y:=x+1; write(x); end.
- var x, y, i: integer; begin readln(x); y:=x div 2; For i:=3 to y do x:=x+2; y:=x+1; write(x); end.
- var x, y, i: integer; begin readln(x); y:=x div 2; For i:=3 to y do x:=x+2; y:=x+1; write(x); end.
18
8
10
6
Какое число получится после выполнения программы ?
var b,s:integer;
begin
b:=7; s:=sqr(b mod 2);
while b
s:=s+b; b:=b*3; end;
write(s);
end.
- var b,s:integer; begin b:=7; s:=sqr(b mod 2); while b
- var b,s:integer; begin b:=7; s:=sqr(b mod 2); while b
- var b,s:integer; begin b:=7; s:=sqr(b mod 2); while b
16
1
20
0
Какое число получится, после
выполнения программы ?
var k,i:integer; s:real;
begin s:=0;
for i:=1 to 2 do
k:=2;
while k
s:=s+round(k/3); k:=k+2;
end;
write(s:0:1);
end.
8.0
3.0
0
4.0
Какое число получится после
выполнения программы,
если ввести число 7?
var b,z,x,y:integer;
begin
readln(b); x:=0;
For z:=b downto 3 do
begin
y:=z mod 2; x:=x+y;
end;
write(x);
end.
3
9
4
12
12 do x:=-1; x:=abs(x+16); write(x); end. 30 12 15 17 " width="640"
Какое число получится после
выполнения программы,
если ввести число 14?
var x:integer;
begin
readln(x);
while x12 do
x:=-1; x:=abs(x+16);
write(x);
end.
30
12
15
17
Какое число получится, после
выполнения программы?
var n,m:integer;
begin
n:=18; m:=n div 7;
repeat
m:=m+n; n:=n-5;
until n
write(m);
end.
- n:=18; m:=n div 7; repeat m:=m+n; n:=n-5; until n
- n:=18; m:=n div 7; repeat m:=m+n; n:=n-5; until n
- n:=18; m:=n div 7; repeat m:=m+n; n:=n-5; until n
- n:=18; m:=n div 7; repeat m:=m+n; n:=n-5; until n
35
3
25
41
Какое число получится, после
выполнения программы?
var r,k:integer;
begin
r:=1;
for k:=1 to 4 do ;
r:=r+2*k;
write(r);
end.
21
17
3
9
Какое число получится после
выполнения программы,
если ввести число 8?
var x,y,z:integer;
begin
readln(x);
For y:=1 to 2*x mod 9 do
begin
z:=y+1; x:=x+1;
end;
write(z);
end.
8
37
11
21
Какое число получится после
выполнения программы,
если ввести число 4,3?
var x,y,z:integer;
Begin
readln(x,y); z:=0;
Repeat
x:=x+y; y:=x-y; x:=x-y; inc(z);
Until z=3;
write(y);
end.
7
3
4
1
Какое число получится, после
Выполнения программы?
var s,a,b:integer;
begin
s:=3;
While odd(s) do
begin
a:=s+1; s:=trunc(a/s);
end;
write(a+s);
end.
1
3
4
2
3 do p:=p-1; s:=s+p; end; write(s); end. 12 14 8 16 " width="640"
Какое число получится, после
Выполнения программы?
var s,i,p:integer;
begin
s:=0;
for i:=1 to 5 do
begin p:=i;
While p3 do
p:=p-1; s:=s+p;
end;
write(s);
end.
12
14
8
16
Молодец!!!
Ответ
правильный
Ответ неправильный
Правильный ответ
1
37
Ответ неправильный
Правильный ответ
2
8
Ответ неправильный
Правильный ответ
3
1
Ответ неправильный
Правильный ответ
4
4.0
Молодец!!!
Ответ правильный
Ответ неправильный
Правильный ответ
1
3
Ответ неправильный
Правильный ответ
2
15
Ответ неправильный
Правильный ответ
3
41
Ответ неправильный
Правильный ответ
4
9
Молодец!!!
Ответ правильный
Ответ неправильный
Правильный ответ
-
1
8
Ответ неправильный
Правильный ответ
2
4
Ответ неправильный
Правильный ответ
3
4
Ответ неправильный
Правильный ответ
4
12
1) 22
2) 18
3) -21
4) 12.0
5) 4 (себебі z- ті шыѓару керек)
6) 11
7) 45
8) 24
9) 2
10) 6
11) 8
12) 40 120
Получите свидетельство
Вход
Циклические алгоритмы (0.77 MB)
0
529
5
Нравится
0
