begin Randomize; Writeln('*** Исходный массив ***'); for i := 1 to n do begin x[i] := Random(101) - 50; Write(x[i]:4); end; Writeln; Writeln('*** Результирующий массив ***'); for i := 1 to n do begin if (x[i] mod 2) = 0 then x[i] := 0; Write(x[i]:4); end; end.
Если Павел лжет в первый день, значит на самом деле он говорит правду либо в понедельник, либо во вторник. Если лжет в третий день - значит говорит правду либо в среду, либо в пятницу.Поскольку он говорит правду лишь в один день, то он не может лгать и в первый день, и в третий. Значит, в какой-то из этих дней он говорит правду. Значит, во второй день он точно лжет, следовательно второй день - это либо понедельник, либо вторник, либо среда либо пятница.Осталось выяснить, в какой из дней он говорит лжет, в первый или третий. Пусть это третий. Значит он говорит правду в среду или в пятницу - и первый день это среда или пятница. Но тогда второй день - четверг или суббота, а мы знаем что это невозможно. Противоречие.Следовательно, в первый день Павел солгал, а правду он говорит по понедельникам либо по вторникам. Тогда третий день - понедельник или вторник. Поскольку второй день не может быть воскресеньем, значит третий день (правдивый) - вторник.
Ало лол это игрушка лего