На обработку поступает последовательность из четырёх неотрицательных целых чисел (некоторые числа могут быть одинаковыми). Нужно написать программу, которая выводит на экран количество чётных чисел в исходной последовательности и максимальное чётное число. Если чётных чисел нет, требуется на экран вывести «NO». Известно, что вводимые числа не превышают 1000. Программист написал программу неправильно. Ниже эта написанная им программа для Вашего удобства приведена на пяти языках программирования.
| Бейсик | Python |
|---|---|
CONST n = 4 count = 0 maximum = 1000 FOR I = 1 TO n INPUT x IF x mod 2 = 0 THEN count = count + 1 IF x > maximum THEN maximum = I END IF END IF NEXT I IF count > 0 THEN PRINT count PRINT maximum ELSE PRINT "NO" END IF
| n = 4 count = 0 maximum = 1000 for i in range (1, n+1): x = int(input()) if x % 2 == 0: count += 1 if x > maximum: maximum = i if count > 0: print (count) print (maximum) else: print ("NO")
|
| Алгоритмический язык | Паскаль |
алг нач цел n = 4 цел i, x цел maximum, count count := 0 maximum := 1000 нц для i от 1 до n ввод x если mod(x, 2) = 0 то count := count + 1 если x > maximum то maximum := i все все кц если count > 0 то вывод count, нс в ывод maximum иначе вывод "NO" все кон | const n = 4; var i, x: integer; var maximum, count: integer; begin count := 0; maximum := 1000; for i := 1 to n do begin read(x); if x mod 2 = 0 then begin count := count + 1; if x > maximum then maximum := i end end; if count > 0 then begin writeln(count); writeln(maximum) end else writeln('NO') end. |
| Си++ | |
#include <iostream> using namespace std; #define n 4 int main(void) { int i, x; int maximum, count; count = 0; maximum = 1000; for (i = 1; i <= n; i++) { cin >> x; if (x % 2 == 0) { count++; if (x > maximum) maximum = i; } } if (count > 0) { cout << count << endl; cout << maximum << endl; } else cout << "NO\n"; }
| |
Последовательно выполните следующее.
1. Напишите, что выведет эта программа при вводе последовательности: 2 9 4 3
2. Приведите пример такой последовательности, содержащей хотя бы одно чётное число, что, несмотря на ошибки, приведённая программа печатает правильный ответ.
3. Найдите все ошибки в этой программе (их может быть одна или несколько). Известно, что каждая ошибка затрагивает только одну строку и может быть исправлена без изменения других строк. Для каждой ошибки:
1) выпишите строку, в которой сделана ошибка;
2) укажите, как исправить ошибку, т. е. приведите правильный вариант строки.
Достаточно указать ошибки и способ их исправления для одного языка программирования.
Обратите внимание, что требуется найти ошибки в имеющейся программе, а не написать свою, возможно, использующую другой алгоритм решения. Исправление ошибки должно затрагивать только строку, в которой находится ошибка.
Примечание. 0 – чётное число.
1. Программа выведет 2 1000.
2. Например, набор 2 4 5 1000.
3. Пример исправлений для языка Паскаль
Первая ошибка: maximum := 1000; Исправленная строка: maximum := -1;
Вторая ошибка: maximum := i
Исправленная строка: maximum := x
В программах на других языках ошибочные строки и их исправления аналогичны.
Примечание. Для переменной maximum можно использовать не только значение −1, допускается также использование других отрицательных значений, а также нуля.