Text50. Дан текстовый файл. В каждой его строке первые $$30$$ позиций отводятся под текст, а оставшаяся часть — под вещественное число. Создать два файла: строковый файл, содержащий текстовую часть исходного файла, и файл вещественных чисел, содержащий числа из исходного файла (в том же порядке).
Решаем задачи Абрамян на Паскале. String68
String68. Дана строка, содержащая цифры и строчные латинские буквы. Если буквы в строке упорядочены по алфавиту, то вывести $$0$$; в противном случае вывести номер первого символа строки, нарушающего алфавитный порядок.
Решаем задачи Абрамян на Паскале. File68
File68. Дан строковый файл, содержащий даты в формате, описанном в задании File67. Создать два файла целых чисел, первый из которых содержит значения месяцев, а второй — значения лет для дат из исходного строкового файла (в обратном порядке).
Решаем задачи Абрамян на Паскале. Matrix93
Matrix93. Дана квадратная матрица порядка $$M$$. Обнулить элементы матрицы, лежащие одновременно выше главной диагонали и ниже побочной диагонали. Условный оператор не использовать.
Решаем задачи Абрамян на Паскале. Text49
Text49. Дан текстовый файл и файл целых чисел. Добавить в конец каждой строки текстового файла изображение соответствующего числа из файла целых чисел. Если файл целых чисел короче текстового файла, то оставшиеся строки текстового файла не изменять.
Решаем задачи Абрамян на Паскале. String67
String67. Дано предложение, зашифрованное по правилу, описанному в задании String66. Расшифровать это предложение.
Решаем задачи Абрамян на Паскале. File67
File67. Дан строковый файл, содержащий даты в формате «день/месяц/год», причем под день и месяц отводится по две позиции, а под год — четыре (например, «16/04/2001»). Создать два файла целых чисел, первый из которых содержит значения дней, а второй — значения месяцев для дат из исходного строкового файла (в том же порядке).
Решаем задачи Абрамян на Паскале. Matrix92
Matrix92. Дана квадратная матрица порядка $$M$$. Обнулить элементы матрицы, лежащие одновременно выше главной диагонали и выше побочной диагонали. Условный оператор не использовать.
Решаем задачи Абрамян на Паскале. Text48
Text48. Дан текстовый файл, каждая строка которого содержит изображения нескольких чисел, разделенные пробелами (вещественные числа имеют ненулевую дробную часть). Создать файл целых чисел, содержащий все целые числа из исходного файла (в том же порядке).
Решаем задачи Абрамян на Паскале. String66
String66. Дана строка-предложение. Зашифровать ее, поместив вначале все символы, расположенные на четных позициях строки, а затем, в обратном порядке, все символы, расположенные на нечетных позициях (например, строка «Программа» превратится в «ргамамроП»).