Задание № 7190

На обработку поступает последовательность из четырёх неотрицательных целых чисел (некоторые числа могут быть одинаковыми). Нужно написать программу, которая выводит на экран количество всех чисел исходной последовательности, которые делятся на 11, и сумму таких чисел. Если в последовательности нет чисел, которые делятся на 11, то на экран нужно вывести «NO». Известно, что вводимые числа не превышают 1000. Программист написал программу неправильно. Ниже эта программа для Вашего удобства приведёна на четырёх языках программирования.

Бейсик

CONST n = 4 
count = 0
sum = 0
FOR I = 1 ТО n
    INPUT x
    IF x mod 11 = 0 THEN
        count = count + 1
        sum = x
    END IF
NEXT I
IF sum > 0 THEN
    PRINT count
    PRINT sum
ELSE
    PRINT "NO"
END IF

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

алг
нач
    цел n = 4
    цел i, х
    цел sum, count
    count := 0
    sum := 0
    нц для i от 1 до n
        ввод x
        если mod(x, 11) = 0 то
            count := count + 1
            sum := х
        все
    кц
    если sum > 0
    то
        вывод count, нс
        вывод sum, нс
    иначе
        вывод "NO"
    все
кон

Паскаль

const n = 4;
var i, x: integer;
var sum, count: integer;
begin
    count := 0;
    sum := 0;
    for i := 1 to n do
    begin
        read(x);
        if x mod 11 = 0 then
        begin
            count := count + 1;
            sum := x
        end
    end;
    if sum > 0 then
    begin
    writeln(count);
    writeln(sum)
    end
    else
        writeln('NO')
end.

Си

#define n 4 void main(void)
{
    int i, x;
    int sum, count;
    count = 0;
    sum = 0;
    for (i = 1; i <= n; i++)
#include <stdio.h>
    {
        scanf("%d", &x) ;
        if (x % 11 == 0)
        {
            count++;
            sum = x;
        }
    }
    if (sum > 0)
    {
        printf("%d\n", count);
        printf("%d\n", sum);
    }
    else
        printf("N0\n");
}

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

1. Напишите, что выведет эта программа при вводе последовательности: 22 33 65 45

2. Приведите пример такой последовательности, содержащей хотя бы одно число, кратное 11, что, несмотря на ошибки, программа печатает правильный ответ.

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

1) выпишите строку, в которой сделана ошибка;

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

Обратите внимание, что требуется найти ошибки в имеющейся программе, а не написать свою, возможно, использующую другой алгоритм решения. Исправление ошибки должно затрагивать только строку, в которой находится ошибка.

Примечание: 0 делится на любое целое число.


Решать другие задания по теме: Поиск и ис­прав­ле­ние ошибок в программе

Показать ответ
Комментарий:

Содержание верного ответа

Решение использует запись программы на Паскале. Допускается использование программы на трёх других языках программирования.

1. Программа выведет два числа: 2 и 33.

2. Пример последовательности, содержащей числа, кратные 11, и для которой программа работает правильно: 1 3 11 20.

Замечание для проверяющего. В конце работы программы значение переменной sum всегда равно последнему числу последовательности, которое делится на 11, или 0, если в последовательности нет чисел, кратных 11. Значение переменной count вычисляется правильно. Ввиду второй ошибки программа будет работать верно, если:

1) в последовательности сумма чисел, кратных 11, равна последнему числу, кратному 11;

2) это число больше 0.

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

Первая ошибка: неверное присваивание при вычислении текущей суммы.

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

sum := х 

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

sum := sum + х

Вторая ошибка: неверная проверка наличия чисел, кратных 11, при печати.

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

if sum > 0 then

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

if count > 0 then
Ответ:

Нашли ошибку в задании? Выделите фрагмент и нажмите Ctrl + Enter.