На вопрос кто из абитуриентов а,в,с может работать на компьютере ,был получен ответ: если может работать в,то может работать и с,но неверно ,что если может работать а,то может работать и с. кто из 3х абитуриентов может работать на персональном компьютере? ответ пояснить решением
120
449
Ответы на вопрос:
Формализуем данные и : не верно, что если может работать a, то может работать и cзначит если а не работает то и с не работает, получается из 3х абитуриентов работать может только в
//pascal abc.net 3.1 сборка 1219 var ar: array of integer; i,n: integer; procedure quicksort(var a: array of integer; lo,hi: integer); procedure sort(l,r: integer); var i,j,x: integer; begin i: =l; j: =r; x: =a[random(r-l+1)+l]; repeat while a[i]> x do i: =i+1; while x> a[j] do j: =j-1; if i< =j then begin if a[i]< a[j] then swap(a[i],a[j]); i: =i+1; j: =j-1; end; until i> =j; if l< j then sort(l,j); if i< r then sort(i,r); end; begin; randomize; sort(lo,hi) end; begin readln(n); setlength(ar,n); n: =n-1; writeln('array: '); for i: =0 to n do begin ar[i]: =random(10); write(ar[i]: 4); end; quicksort(ar,0,n); writeln; writeln('final array: '); for i: =0 to n do write(ar[i]: 4); end. пример ввода: 5 пример вывода: array: 8 7 5 9 4 final array: 9 8 7 5 4
Популярно: Информатика
-
oleh0915610.06.2020 08:13
-
Ira01928.04.2023 22:47
-
azateybaikal12.07.2020 23:50
-
zimina3117.12.2021 02:20
-
gulzanairgalievi19.04.2022 13:16
-
denisgolubev123.11.2022 18:03
-
tynvik12.05.2022 08:46
-
Ясте15.10.2022 02:32
-
aselkulmagambet07.01.2021 06:54
-
СаММЫч06.01.2020 21:52