В PascalABC.NET эта задача решается легко и быстро. В других версиях будет монстрик.
// PascalABC.NET 3.2, сборка 1417 от 28.03.2017 // Внимание! Если программа не работает, обновите версию!
procedure MakeFile(path:string); // не относится к заданию, создает файл Text со 100 числами begin WriteLines(path,SeqRandom(100,-99,99).Select(x->x.ToString)) end;
begin MakeFile('MyFile1.txt'); // теперь у нас есть текстовый файл из 100 случайных чисел // собственно, решение var n:=ReadInteger('Укажите количество чисел:'); var a:=ReadLines('MyFile1.txt').Take(n).ToArray; Writeln('Исходная последовательность'); a.Println; Writeln('Результирующая последовательность'); a:=a.OrderBy(x->x.Last).ToArray; a.Println; WriteAllLines('MyFile2.txt',a); end.
В России пользователи чаще всего называют символ @ собакой, из-за чего адреса электронной почты, образованные от личных имен и фамилий, приобретают иной раз слегка обидное звучание. Справедливости ради надо отметить, что в России этот знак называют также собачкой, лягушкой, плюшкой, ухом, бараном и даже крякозяброй. Пользователям Интернета в других странах нравятся самые разные названия для знака @. В Японии – «значок а» , в Болгарии – «а обезьянье» , в Голландии – «обезьяний хвост» , в Финляндии – «кошкин хвост» , во Франции – «улиточка» , в Венгрии – «гусеничка» , «червячок» , «поросячий хвостик» , в Израиле – «штрудель» , в Китае – «мышонок» , в Норвегии – «канельболле» (спирально закрученная булочка с корицей, то есть плюшка) . В Германии знак дословно называют «обезьяна с цепким хвостом» , но немецкое слово Klammeraffe имеет также второе, переносное, значение: так называют пассажира на мотоцикле, сгорбившегося на втором сиденье за спиной водителя. В Швеции и Дании символ @ сравнивают с хоботом слона, а в Испании – со спиралеобразной конфетой, популярной на острове Майорка. Даже на международном языке эсперанто символ электронной почты получил свое название: «улитка».
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
