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