Задания
Версия для печати и копирования в MS Word
Тип Д24 C1 № 27309
i

Фак­то­ри­а­лом на­ту­раль­но­го числа n (обо­зна­ча­ет­ся n!) на­зы­ва­ет­ся про­из­ве­де­ние всех на­ту­раль­ных чисел от 1 до n. На­при­мер, 4!  =  1 · 2 · 3 · 4  =  24. Даны целые по­ло­жи­тель­ные числа A и B, 0 < A < B < 109 (вы­пол­не­ние этого не­ра­вен­ства га­ран­ти­ру­ет­ся и не долж­но про­ве­рять­ся). Не­об­хо­ди­мо найти и вы­ве­сти ко­ли­че­ство точ­ных фак­то­ри­а­лов, рас­по­ло­жен­ных стро­го между этими чис­ла­ми, то есть ко­ли­че­ство таких N, что A < N! < B. На­при­мер, при A  =  1 и B  =  10 нужно вы­ве­сти число 2 (воз­мож­ные зна­че­ния K  — 2 и 3).

Для ре­ше­ния этой за­да­чи уче­ник на­пи­сал про­грам­му, но, к со­жа­ле­нию, его про­грам­ма не­пра­виль­ная. Ниже эта про­грам­ма для Ва­ше­го удоб­ства при­ве­де­на на пяти язы­ках про­грам­ми­ро­ва­ния.

Бей­сикPython

DIM A, B, C, N, F AS INTEGER

INPUT A, B

C = 0

N = 1

F = 1

WHILE F <= B

    IF F > A THEN

        C = C + 1

    END IF

    F = F * N

    N = N + 1

WEND

PRINT C

a = int(input())

b = int(input())

c = 0

n = 1

f = 1

while f <= b:

    if f > a:

        c += 1

    f *= n

    n += 1

print(c)

Пас­кальАл­го­рит­ми­че­ский язык

var a, b, c, n, f: integer;

begin

    readln(a,b);

    c := 0;

    n := 1;

    f := 1;

    while f <= b do begin

        if f > a then

            c := c + 1;

        f := f * n;

        n := n + 1

    end;

    write(c)

end.

алг

нач

    цел a, b, c, n, f

    ввод a, b

    c := 0

    n := 1

    f := 1

    нц пока f <= b

        если f > a то

            c := c + 1

        все

        f := f * n

        n := n + 1

    кц

    вывод c

кон

Си++

#include <iostream>

using namespace std;

 

int main() {

    int a, b, c, n, f;

    cin >> a >> b;

    c = 0;

    n = 1;

    f = 1;

    while (f <= b) {

        if (f > a)

            ++c;

        f *=n;

        ++n;

    }

    cout << c;

    return 0;

}

По­сле­до­ва­тель­но вы­пол­ни­те сле­ду­ю­щее.

1.  На­пи­ши­те, что вы­ве­дет эта про­грам­ма при вводе чисел 3 и 15.

2.  В про­грам­му ввели зна­че­ние A  =  1. На­зо­ви­те ми­ни­маль­ное зна­че­ние B, при вводе ко­то­ро­го про­грам­ма вы­ве­дет ответ, ко­то­рый на 2 боль­ше вер­но­го.

3.  Най­ди­те в про­грам­ме все ошиб­ки (из­вест­но, что их не боль­ше двух) и ис­правь­те их. Для каж­дой ошиб­ки вы­пи­ши­те стро­ку, в ко­то­рой она до­пу­ще­на, и при­ве­ди­те эту же стро­ку в ис­прав­лен­ном виде.

Спрятать решение

Ре­ше­ние.

1.  При вводе чисел 3 и 15 про­грам­ма вы­ве­дет число 2.

2.  Ми­ни­маль­ное зна­че­ние B  =  2. При A  =  1 и B  =  2 про­грам­ма вы­во­дит ответ 2 вме­сто вер­но­го от­ве­та 0.

3.  В про­грам­ме есть две ошиб­ки.

Пер­вая ошиб­ка: Не­вер­ное срав­не­ние с B в усло­вии цикла. В за­да­че тре­бу­ет­ся под­счи­ты­вать фак­то­ри­а­лы, рас­по­ло­жен­ные стро­го между за­дан­ны­ми чис­ла­ми, по­это­му срав­не­ние долж­но быть стро­гим.

Стро­ка с ошиб­кой:

while f <= b do begin

Вер­ное ис­прав­ле­ние:

while f < b do begin

 

Вто­рая ошиб­ка: Сле­до­ва­ло бы по­ме­нять ме­ста­ми вы­чис­ле­ние фак­то­ри­а­ла и его срав­не­ние с A, но в усло­вии раз­ре­ше­но толь­ко ис­прав­лять стро­ки, по­это­му при­хо­дит­ся встав­лять до­пол­ни­тель­ное срав­не­ние.

Спо­соб 1. Кор­рек­ция умно­же­ния.

Стро­ка с ошиб­кой:

if f > a then

Вер­ное ис­прав­ле­ние:

if (f > a) and (f < b) then

Спрятать критерии
Критерии проверки:

Кри­те­рии оце­ни­ва­ния вы­пол­не­ния за­да­нияБаллы
Не вы­пол­не­ны усло­вия, поз­во­ля­ю­щие по­ста­вить 1, 2 или 3 балла0
Не вы­пол­не­ны усло­вия, поз­во­ля­ю­щие по­ста­вить 2 или 3 балла. Вы­пол­не­ны два не­об­хо­ди­мых дей­ствия из четырёх1
Не вы­пол­не­ны усло­вия, поз­во­ля­ю­щие по­ста­вить 3 балла. Имеет место одна из сле­ду­ю­щих си­ту­а­ций:

а) вы­пол­не­ны три из четырёх не­об­хо­ди­мых дей­ствий. Ни одна вер­ная стро­ка не ука­за­на в ка­че­стве оши­боч­ной;

б) вы­пол­не­ны все че­ты­ре не­об­хо­ди­мых дей­ствия. Ука­за­но в ка­че­стве оши­боч­ной не более одной вер­ной стро­ки

2
Вы­пол­не­ны все че­ты­ре не­об­хо­ди­мых дей­ствия и ни одна вер­ная стро­ка не ука­за­на в ка­че­стве оши­боч­ной3
Мак­си­маль­ный балл3