ЛЮДИ НАПИШИТЕ КОД ПРОГРАММЫ УМОЛЯЮ:-(:-(:-(
?!
Program 123 Begin Y: 1,2,3,4,5,6: x=y; Writeln"2016"; Readln" []"; И так далее Begin End.