Series9. Дано целое число N и набор из N целых чисел. Вывести в том же порядке номера всех нечетных чисел из данного набора и количество K таких чисел.
Решение от Дмитрия:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 |
использовать Файлы П алг работа с файлом (рез цел Kнеч) нач цел файл,a цел n файл:=открыть на чтение ("series9.txt") n:=0 Kнеч:=0 нц пока не конец файла (файл) Фввод файл, a вывод " ",a n:=n+1 если mod(a,2)=1 то вывод "(", n, ")" Kнеч:=Kнеч+1 все кц закрыть(файл) вывод нс кон |
series9.txt
|
1 |
8 5 3 4 9 2 7 8 25 8 14 6 |
Другие задачи из раздела Series можно посмотреть здесь.
Комментарии: