Форум » Циклы и ветвления » Задание 24 №496 » Ответить

Задание 24 №496

Артем: На обработку поступает последовательность из четырёх целых чисел. Нужно написать программу, которая выводит на экран сумму всех отрицательных чисел последовательности и максимальное число в последовательности. Известно, что вводимые числа по абсолютной величине не превышают 1000. Программист написал программу неправильно. var s,i,x,mx: integer; begin mx := 0; s := 0; for i := 1 to 4 do begin read (x); if x < 0 then s := x; if x > mx then mx := x; end; writeln(s); writeln(mx) end. В ответах исправление следующее: Неверная инициализация. Строка с ошибкой: mx := 0; Верное исправление: mx := -1000; Вопрос: можно ли в исправлении написать "mx := -1001;" (минус одна тысяча ОДИН) вместо "mx := -1000;"

Ответов - 1

Поляков: Артем пишет: можно ли в исправлении написать "mx := -1001;" (минус одна тысяча ОДИН) вместо "mx := -1000;" Да. Любое число, не большее, чем -1000.



полная версия страницы