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

Дано на­ту­раль­ное число N, не пре­вос­хо­дя­щее 108. Не­об­хо­ди­мо найти и вы­ве­сти число, ко­то­рое по­лу­чит­ся при за­пи­си N спра­ва на­ле­во и уда­ле­нии всех еди­ниц. Ве­ду­щие нули вы­во­дить не надо. Если в числе N нет цифр кроме еди­ниц и нулей, не­об­хо­ди­мо вы­ве­сти 0. На­при­мер, при вводе числа 1984 нужно вы­ве­сти 489, а при вводе 2001 нужно вы­ве­сти 2. Для ре­ше­ния этой за­да­чи уче­ник на­пи­сал такую про­грам­му:

Бей­сикПас­каль

DIM N, M AS LONG

DIM D AS INTEGER

INPUT N

M = 0

WHILE N>=1

D = N MOD 10

IF D>1 THEN

M = 10*D + M

END IF

N = (N – D) \ 10

WEND

PRINT M

END

var n, m: longint;

d: integer;

begin

read(n);

m := 0;

while n>=1 do begin

d := n mod 10;

if d > 1 then begin

m := 10*d + m;

end;

n := (n – d) div 10;

end;

write(m);

end.

Си++Ал­го­рит­ми­че­ский

#include <iostream>

using namespace std;

int main(){

long int n, m;

int d;

cin >> n;

m = 0;

while (n>=1) {

d = n%10;

if (d>1) {

m = 10*d + m;

}

n = (n – d) / 10;

}

cout << m;

}

алг

нач

цел n, m

цел d

ввод n

m := 0

нц пока n>=1

d := mod(n,10)

если d>1 то

m := 10*d + m

все

n := div(n-d,10)

кц

вывод m

кон

Python

n = int(input())

m = 0

while n >= 1:

    d = n %10

    if d > 1:

        m = 10*d + m

    n = (n – d) // 10

print(m)

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

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

2.  При­ве­ди­те при­мер числа, при вводе ко­то­ро­го про­грам­ма вы­даст вер­ный ответ.

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

 

Об­ра­ти­те вни­ма­ние: Вам нужно ис­пра­вить при­ведённую про­грам­му, а не на­пи­сать свою. Вы мо­же­те толь­ко за­ме­нять оши­боч­ные стро­ки, но не мо­же­те уда­лять стро­ки или до­бав­лять новые. За­ме­нять сле­ду­ет толь­ко оши­боч­ные стро­ки: за ис­прав­ле­ния, внесённые в стро­ки, не со­дер­жа­щие оши­бок, баллы будут сни­жать­ся.

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

Ре­ше­ние.

1.  При вводе числа 1984 про­грам­ма вы­ве­дет число 210.

Ком­мен­та­рий. При­ведённая про­грам­ма вы­во­дит умно­жен­ную на 10 сумму цифр числа, от­лич­ных от 1.

2.  При­ме­ры чисел, для ко­то­рых про­грам­ма даёт вер­ный ответ: 11010, 109, 101701.

3.  Ошиб­ки со­дер­жат­ся в двух стро­ках про­грам­мы.

1.  Не­вер­ное усло­вие про­вер­ки цифры. При­ведённое усло­вие вы­чер­ки­ва­ет не толь­ко еди­ни­цы, но и нули.

2.  Не­вер­ная опе­ра­ция до­бав­ле­ния цифры к за­пи­си: пе­ре­пу­та­ны пе­ре­мен­ные d и m.

 

Усло­вие цикла n>=1 может по­ка­зать­ся не­вер­ным, но в дей­стви­тель­но­сти оно за­пи­са­но пра­виль­но. Обыч­но в по­доб­ных за­да­чах ис­поль­зу­ет­ся усло­вие n > 0, но для це­ло­го n эти два усло­вия эк­ви­ва­лент­ны и, сле­до­ва­тель­но, вза­и­мо­за­ме­ня­е­мы.

Не­вер­ной может по­ка­зать­ся опе­ра­ция из­ме­не­ния N (n:=(n – d) div 10), но ошиб­ки здесь нет. Вы­чи­та­ние d  — лиш­нее дей­ствие, но оно не ока­зы­ва­ет вли­я­ния на ре­зуль­тат всего вы­ра­же­ния, по­это­му его нель­зя счи­тать оши­боч­ным.

 

При­мер ис­прав­ле­ния для языка Пас­каль

Пер­вая стро­ка с ошиб­кой:

if d > 1 then begin

Ис­прав­лен­ная стро­ка:

if d <> 1 then begin

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

m := 10*d + m;

Ис­прав­лен­ная стро­ка:

m := 10*m + d;

 

В про­грам­мах на дру­гих язы­ках про­грам­ми­ро­ва­ния оши­боч­ные стро­ки и их ис­прав­ле­ния ана­ло­гич­ны.

До­пу­сти­мы из­бы­точ­ные скоб­ки, не из­ме­ня­ю­щие пра­виль­ный по­ря­док дей­ствий.

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

Кри­те­рии оце­ни­ва­ния вы­пол­не­ния за­да­нияБаллы
Пра­виль­но вы­пол­не­ны все дей­ствия.

- Ука­зан вер­ный ре­зуль­тат для при­ведённого при­ме­ра вход­ных дан­ных.

- Дан при­мер числа, для ко­то­ро­го про­грам­ма с ошиб­ка­ми выдаёт вер­ный ре­зуль­тат.

- Ука­за­ны и ис­прав­ле­ны две ошиб­ки в про­грам­ме.

- Не ука­за­ны в ка­че­стве оши­боч­ных ни­ка­кие дру­гие стро­ки про­грам­мы.

3
Не вы­пол­не­ны усло­вия, поз­во­ля­ю­щие по­ста­вить 3 балла, и имеет место один из сле­ду­ю­щих слу­ча­ев.

1. Вы­пол­не­ны два пер­вых дей­ствия (вер­ный ре­зуль­тат при ука­зан­ных дан­ных, вер­ный при­мер числа с пра­виль­ным ре­зуль­та­том), най­де­на и ис­прав­ле­на одна ошиб­ка в про­грам­ме, ни одна вер­ная стро­ка не на­зва­на оши­боч­ной.

2. Вы­пол­не­ны два пер­вых дей­ствия (вер­ный ре­зуль­тат при ука­зан­ных дан­ных, вер­ный при­мер числа с пра­виль­ным ре­зуль­та­том), най­де­ны и ис­прав­ле­ны две ошиб­ки в про­грам­ме, одна вер­ная стро­ка на­зва­на оши­боч­ной.

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

одна вер­ная стро­ка не на­зва­на оши­боч­ной.

2
Не вы­пол­не­ны усло­вия, поз­во­ля­ю­щие по­ста­вить 2 или 3 балла, и имеет место один из сле­ду­ю­щих слу­ча­ев:

1. Вы­пол­не­ны два пер­вых дей­ствия (вер­ный ре­зуль­тат при ука­зан­ных дан­ных, вер­ный при­мер по­сле­до­ва­тель­но­сти с пра­виль­ным ре­зуль­та­том). При этом не­су­ще­ствен­но, на­сколь­ко пра­виль­но вы­пол­не­но тре­тье дей­ствие.

2. Най­де­ны и ис­прав­ле­ны две ошиб­ки в про­грам­ме, не более чем одна вер­ная стро­ка на­зва­на оши­боч­ной. При этом не­су­ще­ствен­но, на­сколь­ко пра­виль­но вы­пол­не­ны дей­ствия 1 и 2.

1
Не вы­пол­не­ны усло­вия, поз­во­ля­ю­щие по­ста­вить 1, 2 или 3 балла.0
Мак­си­маль­ный балл3