Создайте файл x, компонентами которого являются элементы массива m. перепишите из файла x в файл y все компоненты, которые стоят на чётных местах. прочитайте файл y. m = (0, 1; 5, 6; 0, 8; 2, 4; 7, 3; 6, 8; 0, 5; 2, 3)

Procedure dec2oct(n: longint); { перевод натурального десятичного n в восьмеричную систему счисления   и вывод результата } const   alpha = '01234567'; var   s: string;   i: integer; begin   s : = '';   while n > 0 do begin       s : = alpha[(n mod 8) + 1] + s;       n : = n div 8   end;   for i: =length(s) to 9 do s: ='0'+s;   write(s) end; { использование } var   x: longint; begin   write('введите десятичное число: '); read(x);   write('в восьмеричной системе счисления: ');   dec2oct(x);   writeln end. тестовое решение: введите десятичное число: 1234567 в восьмеричной системе счисления: 0004553207

Если павел лжет в первый день, значит на самом деле он говорит правду либо в понедельник, либо во вторник.если лжет в третий день - значит говорит правду либо в среду, либо в пятницу.поскольку он говорит правду лишь в один день, то он не может лгать и в первый день, и в третий. значит, в какой-то из этих дней он говорит правду.значит, во второй день он точно лжет, следовательно второй день - это либо понедельник, либо вторник, либо среда либо пятница.осталось выяснить, в какой из дней он говорит лжет, в первый или третий.пусть это третий. значит он говорит правду в среду или в пятницу - и первый день это среда или пятница. но тогда второй день - четверг или суббота, а мы знаем что это невозможно. противоречие.следовательно, в первый день павел солгал, а правду он говорит по понедельникам либо по вторникам. тогда третий день - понедельник или вторник. поскольку второй день не может быть воскресеньем, значит третий день (правдивый) - вторник.