Контрольная работа "Оператор цикла с предусловием" 9 класс
б) s:=0;
i:=0;
while i<5 do
begin
i:=i+1
s:=s+1/i;
end;
б) s:=0;
i:=0;
while i<5 do
begin
i:=i+1
s:=s+1/i;
end;
Контрольная работа по теме «Оператор цикла с предусловием» Вариант 1
1. Чему будет равно значение переменной n после выполнения инструкций:
n:=0;
while n<5 do
n:=n+1;
2. Что будет выводиться на экран во время выполнения инструкций:
n:=1;
while n<=10 do
begin
x:=n*n;
wtiteln(n,’ ’,x);
n:=n+1;
end;
3. Игра «Угадай число» заканчивается, если количество попыток достигло 10.
Напишите условие завершения игры
c:=0; //число попыток
while условие do
begin
write (‘Ваш вариант’);
readln(m);
c:=c+1;
end;
4. Определить значение переменной s после выполнения операторов:
а) s:=0;
i:=0;
while i<5 do
begin
i:=i+1
end;
s:=s+1/i;
5. Найти ошибки в следующем фрагменте программы:
a) p:=0;
while i do
begin
p:=p*i;
end;
б) s:=0;
while s<10 do
begin
s:=s+i;
i:=i+k;
end;
6. Даны N вещественных чисел. Найти среднее арифметическое отрицательных
чисел.
7. Вычислить произведение первых 5 четных чисел.
Контрольная работа по теме «Оператор цикла с предусловием» Вариант 2
1. Чему будет равно значение переменной n после выполнения инструкций:
n:=0;
while n<5 do
n:=n+1;
2. Что будет выводиться на экран во время выполнения инструкций:
n:=1;
while n<=10 do
begin
x:=n*n;
wtiteln(n,’ ’,x);
n:=n+1;
end;
3. Игра «Угадай число» заканчивается, если количество попыток достигло 10.
Напишите условие завершения игры
c:=0; //число попыток
while условие do
begin
write (‘Ваш вариант’);
readln(m);
c:=c+1;
end;
4. Определить значение переменной s после выполнения операторов:
а) s:=0;
i:=0;
while i<5 do
begin
i:=i+1
end;
s:=s+1/i;
5. Найти ошибки в следующем фрагменте программы:
a) p:=0;
while i do
begin
p:=p*i;
end;
б) s:=0;
while s<10 do
begin
s:=s+i;
i:=i+k;
end;
6. Даны N вещественных чисел. Найти среднее арифметическое положительных
чисел.
7. Вычислить произведение первых 5 нечетных чисел.
