// pascalabc.net 3.2, сборка 1427 от 24.04.2017 // внимание! если программа не работает, обновите версию! begin var s1: =seqrandom(readinteger('n1=',50); var s2: =seqrandom(readinteger('n2=',50); var p: =readinteger('0-по неубыванию, иное- по невозрастанию: '); var q1: =new queue< integer> ; foreach var m in s1 do q1.enqueue(m); write('очередь 1: ',q1); writeln; var q2: =new queue< integer> ; foreach var m in s2 do q2.enqueue(m); write('очередь 2: ',q2); writeln; // очереди сформированы var q: =new queue< integer> ; var a: =(q1.toarray+q2.toarray); var s: sequence of integer; if p=0 then s: =a.orderby(i-> i) else s: =a.orderbydescending(i-> i).toarray; foreach var m in s do q.enqueue(m); write('очередь-результат: ',q); writeln; end. пример n1= 10 n2= 7 0-по неубыванию, иное- по невозрастанию: 1 очередь 1: [-26,6,26,-48,-21,-29,27,-39,5,-40] очередь 2: [50,36,37,46,18,41,-39] очередь-результат: [50,46,41,37,36,27,26,18,6,5,-21,-26,-29,-39,-39,-40,-48]
Roman343247
23.10.2022
Первая программа using system; using system.collections.generic; using system.linq; using system.text; using system.threading.tasks; namespace factorial { class program { static void main(string[] args) { string str = ""; console.writeline("vvestu n: "); str = console.readline(); int n = convert.toint32(str); console.writeline(enumerable.range(1, n).aggregate((p, x) => p * x)); console.readkey(); } } } вторая программа (поменяй путь на свой! ) using system; using system.collections.generic; using system.diagnostics; using system.linq; using system.text; using system.threading.tasks; namespace open { class program { static void main(string[] args) { system.diagnostics.process.start(@"t: \program files\projects\lessons\factorial\factorial\bin\debug\factorial.exe"); } } }