СДЕЛАЙТЕ СВОИ УРОКИ ЕЩЁ ЭФФЕКТИВНЕЕ, А ЖИЗНЬ СВОБОДНЕЕ

Благодаря готовым учебным материалам для работы в классе и дистанционно

Скидки до 50 % на комплекты
только до

Готовые ключевые этапы урока всегда будут у вас под рукой

Организационный момент

Проверка знаний

Объяснение материала

Закрепление изученного

Итоги урока

6_Теоретический тест для повторения темы "Цикл с переменной" в 9 или 10 классе.

Категория: Информатика

Нажмите, чтобы узнать подробности

Теоретический тест для повторения темы "Цикл с переменной" в 9 или 10 классе. 

Показывает уровень понимания работы циклического алгоритма. Содержит десять заданий. Для решения необходимо заполнить трассировочную таблицу, расположенную справа от алгоритма. Для самопроверки результата, можно алгоритм вводить с клавиатуры и проверять в среде программирования PascalABC.Net.

Просмотр содержимого документа
«6_Теоретический тест для повторения темы "Цикл с переменной" в 9 или 10 классе.»

Вариант № 1 Цикл FOR

1. Запишите зна­че­ние пе­ре­мен­ной d, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var d,n: integer;

Begin

d := 6;

d := d-2;

For n := 1 to 4 do

d : = d + n ;

Writeln(d);

End .

n

d














2. 
Запишите зна­че­ние переменной k, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var k, i: integer;

Begin

k := 4;

For i := 1 to 3 do

k := i + 2*k;

Writeln(k);

End.
















3. 
Определите, что будет на­пе­ча­та­но в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var u,i: integer;

Var s, k: integer;

Begin

s:=0;

for k:=3 to 10 do

s:=s+13;

write(s);

End.
















4. Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 14 to 18 do

s := s+7;

writeln(s);

End.
















5. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 13 to 16 do

s := s + 14;

writeln(s);

End.
















6. 
Определите, что будет на­пе­ча­та­но в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s, k: integer;

Begin

s := 3;

for k := 0 to 9 do

s := s + 3;

write (s);

End.
















7. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 6 to 12 do

s := s + 10;

writeln(s);

End.
















8. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 3 to 7 do

s := s + 6;

writeln(s);

End.
















9. 
Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 6 to 12 do

s := s+10;

writeln(s);

End.
















10. 
Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s, n: integer;

Begin

s := 2;

For n := 2 to 5 do

s := s + n*2;

Writeln(s);

End.























Вариант № 2 Цикл FOR


1. Определите, что будет на­пе­ча­та­но в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s, k: integer;

Begin

s := 1;

for k := 0 to 9 do

s := s + 5;

write (s);

End.
















2. 
Запишите зна­че­ние пе­ре­мен­ной y, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var y,i: integer;

Begin

y := 5;

For i := 1 to 3 do

y := y + 5*i;

Writeln(y);

End.
















3. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 6 to 12 do

s := s + 10;

writeln(s);

End.
















4. 
Запишите зна­че­ние пе­ре­мен­ной u, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var u,i: integer;

Begin

u := 26;

For i := 1 to 5 do

u := u – i;

Writeln(u);

End.
















5. 
Определите, что будет на­пе­ча­та­но в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s, k: integer;

Begin

s := 1;

for k := 3 downto 0 do

s := s*3;

write (s);

End.
















6. 
Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s, n: integer;

Begin

s := 5;

For n := 2 to 4 do

s := s + (n-1);

Writeln(s);

End.
















7. 
Запишите зна­че­ние пе­ре­мен­ной t, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var t,i: integer;

Begin

t := 2;

For i := 1 to 3 do

t := t * i;

Writeln(t);

End.
















8. 
Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 4 to 9 do

s := s + 12;

writeln(s);

End.
















9. 
Определите, что будет на­пе­ча­та­но в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var u,i: integer;

Var s, k: integer;

Begin

s:=0;

for k:=3 to 10 do

s:=s+13;

write(s);

End.
















10. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 9 to 13 do

s := s + 9;

writeln(s);

End.





















Вариант № 3 Цикл FOR

1. Запишите зна­че­ние пе­ре­мен­ной f, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var f,n: integer;

Begin

f := 4;

f := f*3;

For n := 1 to 4 do

f := f + n;

Writeln(f);

End.
















2. 
Запишите зна­че­ние пе­ре­мен­ной f, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var f,n: integer;

Begin

f := 22;

f := f–20;

For n := 1 to 5 do

f := f + n;

Writeln(f);

End.
















3. 
Запишите зна­че­ние пе­ре­мен­ной u, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var u,i: integer;

Begin

u := 26;

For i := 1 to 5 do

u := u – i;

Writeln(u);

End.
















4. 
Запишите зна­че­ние пе­ре­мен­ной y, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var y,i: integer;

Begin

y := 5;

For i := 1 to 3 do

y := y + 5*i;

Writeln(y);

End.
















5. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 6 to 12 do

s := s + 10;

writeln(s);

End.



















6. Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

var n, s: integer;

begin

s := 1;

for n := 2 to 5 do

s := s * 3;

write(s);

end.
















7. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 3 to 7 do

s := s + 6;

writeln(s);

End.
















8. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 8;

for k := 3 to 8 do

s := s + 8;

writeln(s);

End.
















9. 
Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 4 to 9 do

s := s + 12;

writeln(s);

End.
















10. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 3 to 8 do

s := s + 9;

writeln(s);

End.





















Вариант № 4 Цикл FOR

1. Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s, n: integer;

Begin

s := 2;

For n := 2 to 5 do

s := s + n*2;

Writeln(s);

End.
















2. 
Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

var n, s: integer;

begin

s := 1;

for n := 2 to 5 do

s := s * 3;

write(s);

end.
















3. 
Определите, что будет на­пе­ча­та­но в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s, k: integer;

Begin

s := 2;

for k := 1 to 5 do

s := s*2;

write (s);

End.
















4. 
Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 50;

for k := 0 to 8 do

s := s - 4;

writeln(s);

End.

















5. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 5 to 9 do

s := s + 8;

writeln(s);

End.



















6. Запишите зна­че­ние пе­ре­мен­ной d, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var d,n: integer;

Begin

d := 5;

d := d-3;

For n := 1 to 4 do

d := d + n;

Writeln(d);

End.
















7. 
Запишите зна­че­ние пе­ре­мен­ной d, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var d,n,i:integer;

Begin

n := 4;

d := n*2;

For i := 1 to 3 do

d := d + 2*i;

Writeln(d);

End.
















8. 
Определите, что будет на­пе­ча­та­но в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s, k: integer;

Begin

s := 1;

for k := 0 to 4 do

s := s*3;

write (s);

End.
















9. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 6 to 9 do

s := s + 12;

writeln(s);

End.
















10. 
Запишите зна­че­ние переменной k, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var k, i: integer;

Begin

k := 2;

For i := 0 to 2 do

k := i + 3*k;

Writeln(k);

End.





















Вариант № 5 Цикл FOR

1. Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 12 to 15 do

s := s + 13;

writeln(s);

End.
















2. 
Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s, n: integer;

Begin

s := 2;

For n := 2 to 5 do

s := s + n*2;

Writeln(s);

End.
















3. Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 3 to 8 do

s := s + 9;

writeln(s);

End.
















4. 
Определите, что будет на­пе­ча­та­но в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var u,i: integer;

Var s, k: integer;

Begin

s:=0;

for k:=3 to 10 do

s:=s+13;

write(s);

End.
















5. 
Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 14 to 18 do

s := s+7;

writeln(s);

End.


















6. Определите, что будет на­пе­ча­та­но в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s, k: integer;

Begin

s := 1;

for k := 0 to 9 do

s := s + 5;

write (s);

End.
















7. 
Запишите зна­че­ние пе­ре­ме­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

    s:=0;

for k:=1 to 11 do

        s:=s+12;

    write(s);

End.
















8. 
Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

var n, s: integer;

begin

s := 0;

for n := 3 to 7 do

s := s + 2 * n;

write(s);

end.
















9. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 8 to 12 do

s := s + 12;

writeln(s);

End.
















10. 
Запишите зна­че­ние пе­ре­мен­ной u, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var u,i: integer;

Begin

u := 30;

For i := 1 to 6 do

u := u – i;

Writeln(u);

End.





















Вариант № 6 Цикл FOR

1. Запишите зна­че­ние пе­ре­мен­ной t, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var t,i: integer;

Begin

t := 1;

For i := 1 to 4 do

t := t * i;

Writeln(t);

End.
















2. 
Запишите зна­че­ние пе­ре­мен­ной d, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var d,n: integer;

Begin

d := 5;

d := d-3;

For n := 1 to 4 do

d := d + n;

Writeln(d);

End.
















3. 
Запишите зна­че­ние пе­ре­ме­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

    s:=0;

for k:=1 to 11 do

        s:=s+12;

    write(s);

End.
















4. 
Запишите зна­че­ние пе­ре­мен­ной t, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var t,i: integer;

Begin

t := 2;

For i := 1 to 3 do

t := t * i;

Writeln(t);

End.
















5. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 3 to 8 do

s := s + 9;

writeln(s);

End.




















6. Запишите зна­че­ние пе­ре­мен­ной y, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var y,i: integer;

Begin

y := 5;

For i := 1 to 3 do

y := y + 5*i;

Writeln(y);

End.
















7. 
Запишите зна­че­ние пе­ре­мен­ной u, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var u,i: integer;

Begin

u := 26;

For i := 1 to 5 do

u := u – i;

Writeln(u);

End.
















8. 
Запишите зна­че­ние пе­ре­мен­ной f, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var f,n: integer;

Begin

f := 4;

f := f*3;

For n := 1 to 4 do

f := f + n;

Writeln(f);

End.
















9. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 6 to 10 do

s := s + 10;

writeln(s);

End.
















10. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 3 to 7 do

s := s + 6;

writeln(s);

End.





















Вариант № 7 Цикл FOR

1. Запишите зна­че­ние пе­ре­мен­ной d, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var d,n,i:integer;

Begin

n := 4;

d := n*2;

For i := 1 to 3 do

d := d + 2*i;

Writeln(d);

End.
















2. 
Запишите зна­че­ние пе­ре­мен­ной y, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var y,i: integer;

Begin

y := 5;

For i := 1 to 3 do

y := y + 5*i;

Writeln(y);

End.
















3. 
Запишите зна­че­ние пе­ре­мен­ной u, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var u,i: integer;

Begin

u := 26;

For i := 1 to 5 do

u := u – i;

Writeln(u);

End.
















4. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 8;

for k := 3 to 8 do

s := s + 8;

writeln(s);

End.
















5. 
Запишите зна­че­ние пе­ре­мен­ной d, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var d,n: integer;

Begin

d := 5;

d := d-3;

For n := 1 to 4 do

d := d + n;

Writeln(d);

End.





















6. Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 9 to 13 do

s := s + 9;

writeln(s);

End.
















7. 
Запишите зна­че­ние пе­ре­мен­ной d, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var d,n,i: integer;

Begin

n := 3;

d := n*3;

For i := 1 to 3 do

d := d + i;

Writeln(d);

End.
















8. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 3 to 7 do

s := s + 6;

writeln(s);

End.
















9. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 7 to 11 do

s := s + 11;

writeln(s);

End.
















10. 
Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 14 to 18 do

s := s+7;

writeln(s);

End.



















Вариант № 8 Цикл FOR

1. Запишите зна­че­ние пе­ре­мен­ной y, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var y,i: integer;

Begin

y := 5;

For i := 1 to 3 do

y := y + 5*i;

Writeln(y);

End.
















2. 
Запишите зна­че­ние пе­ре­мен­ной d, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var d,n: integer;

Begin

d := 6;

d := d-2;

For n := 1 to 4 do

d : = d + n ;

Writeln(d);

End .
















3. 
Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 6 to 12 do

s := s+10;

writeln(s);

End.
















4. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 8;

for k := 3 to 8 do

s := s + 8;

writeln(s);

End.
















5. 
Определите, что будет на­пе­ча­та­но в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var u,i: integer;

Var s, k: integer;

Begin

s:=0;

for k:=3 to 10 do

s:=s+13;

write(s);

End.





















6. Определите, что будет на­пе­ча­та­но в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s, k: integer;

Begin

s := 1;

for k := 0 to 9 do

s := s + 5;

write (s);

End.
















7. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 6 to 12 do

s := s + 10;

writeln(s);

End.
















8. 
Определите, что будет на­пе­ча­та­но в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s, k: integer;

Begin

s := 100;

for k := 1 to 9 do

s := s - 5;

write (s);

End.
















9. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 8 to 12 do

s := s + 12;

writeln(s);

End.
















10. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 7 to 12 do

s := s + 11;

writeln(s);

End.



















Вариант № 9 Цикл FOR

1. Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 8;

for k := 3 to 8 do

s := s + 8;

writeln(s);

End.
















2. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 3 to 8 do

s := s + 9;

writeln(s);

End.
















3. 
Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 50;

for k := 0 to 8 do

s := s - 4;

writeln(s);

End.
















4. 
Определите, что будет на­пе­ча­та­но в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s, k: integer;

Begin

s := 1;

for k := 0 to 9 do

s := s + 5;

write (s);

End.
















5. 
Запишите зна­че­ние переменной y, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var y,i: integer;

Begin

y := 0;

For i := 1 to 3 do

y := y + 4*i;

Writeln(y);

End.






















6. Запишите зна­че­ние пе­ре­мен­ной u, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var u,i: integer;

Begin

u := 26;

For i := 1 to 5 do

u := u – i;

Writeln(u);

End.
















7. 
Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s, n: integer;

Begin

s := 2;

For n := 2 to 5 do

s := s + n*2;

Writeln(s);

End.















8. Запишите зна­че­ние переменной k, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var k, i: integer;

Begin

k := 4;

For i := 1 to 3 do

k := i + 2*k;

Writeln(k);

End.
















9. 
Запишите зна­че­ние пе­ре­мен­ной d, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var d,n: integer;

Begin

d := 5;

d := d-3;

For n := 1 to 4 do

d := d + n;

Writeln(d);

End.
















10. 
Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

var n, s: integer;

begin

s := 1;

for n := 2 to 5 do

s := s * 3;

write(s);

end.


















Вариант № 10 Цикл FOR

1. Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 4 to 7 do

s := s + 8;

writeln(s);

End.
















2. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 12 to 15 do

s := s + 13;

writeln(s);

End.
















3. 
Запишите зна­че­ние переменной y, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var y,i: integer;

Begin

y := 0;

For i := 1 to 3 do

y := y + 4*i;

Writeln(y);

End.
















4. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s, i: integer;

Begin

s := 3;

For i := 2 to 5 do

s := s + 2*i;

Writeln(s);

End.
















5. 
Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 6 to 12 do

s := s + 10;

writeln(s);

End.






















6. Запишите зна­че­ние переменной s, по­лу­чен­ное в ре­зуль­та­те работы сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 6 to 10 do

s := s + 10;

writeln(s);

End.
















7. 
Запишите зна­че­ние пе­ре­ме­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

    s:=0;

for k:=1 to 11 do

        s:=s+12;

    write(s);

End.
















8. 
Определите, что будет на­пе­ча­та­но в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s, k: integer;

Begin

s := 50;

for k := 1 to 9 do

s := s - 3;

write (s);

End.
















9. 
Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s, n: integer;

Begin

s := 5;

For n := 2 to 4 do

s := s + (n-1);

Writeln(s);

End.
















10. 
Запишите зна­че­ние пе­ре­мен­ной s, по­лу­чен­ное в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей программы. Текст про­грам­мы приведён на трёх язы­ках программирования.

 

Паскаль

Var s,k: integer;

Begin

s := 0;

for k := 2 to 12 do

s := s + 11;

writeln(s);

End.


















Ответы Цикл FOR

Вариант1 Вариант 2 вариант 3

Вариант 4 вариант 5 вариант 6

Вариант 7 вариант 8 вариант 9

Вариант 10




Скачать

Рекомендуем курсы ПК и ППК для учителей

Вебинар для учителей

Свидетельство об участии БЕСПЛАТНО!