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

Бейсик

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

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

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

Паскаль

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

Си

linclude <stdio.h>
Idefine n 4

void main(void)
{
    int i, x;
    int minimum, count;
    count = 0;
    minimum = 0;
    for (i = 1; i <= n; i++)
    {
        scanf("%d" , &x);
        if (x % 3 == 0)
        {
        count++;
        if (х < minimum)
            minimum = i;
        }
    }
    if (count > 0)
    {
        printf("%d\n" , count);
        printf("%d\n", minimum);
    }
    else
        printf("NO\n");
}

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

1. Напишите, что выведет эта программа при вводе последовательности: 6 9 12 5

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

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

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

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

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

Примечание: 0 — кратное 3 число.