Отметьте все формулы, которые не изменятся при копировании из ячейки c6 в ячейку d6. =$a5+$b2 =$a$5+$b$2 =$a$5+$b2 =a$5+b$2 =a$5+$b2 8. отметьте все формулы, которые не изменятся при копировании из ячейки c6 в ячейку d8. =$a5+$b2 =$a$5+$b$2 =$a$5+$b2 =a$5+b$2 =a$5+$b2
219
293
Ответы на вопрос:
Const n = 10; var a : array [1..n] of integer; i, j, k, kol, p : integer; begin randomize; for i: = 1 to n do a[i]: = random(100); for i: = 1 to n-1 do for j: = 1 to n-i do if a[j] > a[j+1] then begin k: = a[j]; a[j]: = a[j+1]; a[j+1]: = k; end; kol: = 0; p: = 1; for i: = 1 to n do if (a[i] > 20) and (a[i] < 50) then begin inc(kol); p: = p * a[i]; end; writeln(kol,' ',p); end.
Популярно: Информатика
-
Aminka2604.05.2022 11:42
-
ParkTaehyung07.04.2020 14:44
-
Ogents00705.07.2021 15:41
-
nifirazifira17.12.2022 03:42
-
Ксюнька180117.12.2021 14:47
-
Дурачкао16.11.2020 08:03
-
Five1113.10.2020 22:50
-
бульбулядор16.12.2021 13:19
-
vikakotova312.04.2023 14:20
-
Sashafgbjk01.12.2022 11:50