Array7. Дан массив размера $$N$$. Вывести его элементы в обратном порядке.
Решение от Дмитрия:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 |
использовать Файлы П алг array7 нач цел файл цел x цел k вещ таб a[1:1000] k:=0 файл:=открыть на чтение("Array7.txt") нц пока не конец файла (файл) k:=k+1 Фввод файл,x a[k]:=x вывод a[k]," " кц вывод " ", нс если не конец файла(файл) то вывод "В файле остались непрочитанные данные", нс всё закрыть (файл) цел i нц для i от k до 1 шаг -1 вывод a[i]," " кц кон |
Array7.txt
1 |
3 45 6 2 8 4 7 0 3 2 1 5 |
Другие задачи из раздела Array можно посмотреть здесь.
Комментарии: