Питання практичного характеру
Конструктор тестів
- Всеосвіта›
- Бібліотека тестів›
- Інформатика›
- Складання алгоритмів з повтореннями та розгалудженнями для опрацювання величин
Тест:
Складання алгоритмів з повтореннями та розгалудженнями для опрацювання величин
23.04.2020
Опис тесту (учням цей опис не показується):
Вміст тесту:
1
2
3
4
5
6
7
8
9
10
Опис, який учні побачать перед початком тестування
Питання практичного характеру
1
4 з 21 бала
Встановіть відповідність між операторами і діями, які вони реалізують
1
S := 0; A := 0;
Whіle A<=100 Do begin
A := A+4; S := S+A; end;
А
Знайти суму натуральних чисел, кратних 4 і менших або рівних 100
2
S := 0; A := 0; n:=0;
Whіle n<10 Do begin
n:=n+1; A := A+2; S := S+A; end;
Б
Знайти суму чисел, зворотних першим 10 натуральним числам
3
S := 0; A := -1; n:=0;
Whіle n<10 Do begin
n := n+1; A := A+2; S := S+A; end;
В
Знайти суму перших десяти непарних чисел
4
S := 0; n:=0;
Whіle n<10 Do begin
n:=n+1; S := S+1/n; end;
Г
Знайти суму перших десяти парних чисел
2
1 з 21 бала
Чому дорівнює S після виконання циклу:
S := 0; For і := 5 To 7 Do S := S+1;
3
3 з 21 бала
Який оператор реалізує дію: знайти суму перших 10 натуральних чисел?
4
4 з 21 бала
Встановіть відповідність між еквівалентними операторами
1
Repeat X := X+1 untіl X>10;
А
Whіle Х <= 10 do begin X := X+1; S := S+X end;
2
While N<1000 do begin
N := N+1;
S := S+1/N end;
Б
Whіle Х <= 10 do X := X+1;
3
While N<1000 do begin
N := N+1;
S := S+N end;
В
Repeat N := N+1;
S := S+1/N
Untіl N >= 1000;
4
Repeat X:=X+1; S:=S+X untіl X>10;
Г
Repeat N := N+1;
S := S+N
Untіl N >= 1000;
5
1 з 21 бала
Чому дорівнює S після виконання циклу:
S := 0; For і := 10 DownТo 6 Do S := S+1;
6
1 з 21 бала
Визначте, чому дорівнює F після виконання циклу:
F := 1; A:= 3;
For i := 1 To 3 Do F:= F * A;
7
2 з 21 бала
Визначте, які оператори реалізують обчислення f=10!. Факторіал – це добуток.
8
3 з 21 бала
В яких операторах допущені помилки?
9
1 з 21 бала
Встановіть порядок розташування операторів у програмі для визначення кількості парних серед введених з клавіатури восьми довільних чисел.
- k := 0;
- if a mod 2=0 Then k := k+1;
- For i := 1 to 8 do begin
- a := StrToInt(InputBox('Ввести 8 чисел', IntToStr(i), '0'));
- end;
- Edit1.text := IntToStr(k);
10
1 з 21 бала
Чому дорівнює S після виконання фрагмента програми:
var і:Integer; A,S:Real;
begin S := 0; A := 0;
For і := 1 To 5 Do begin
A := A+0.2;
S := S+A end;
Рефлексія від 93 учнів
Сподобався:
0
Так: 60
Ні: 33
Зрозумілий:
0
Так: 54
Ні: 39
Потрібні роз'яснення:
0
Ні: 71
Так: 22