Заполните таблицу по образцу, приведенному ниже, и выполните соответствующие вычисления. Произведите вычисления для столбцов "Выполнение" и "Отклонение от плана". Используйте статистические функции МАКС и СРЗНАЧ для вычисления среднего и максимального значения по полю "План" и "Фактически".
№ Месяц Отчетный год Отклонение от плана, % План, р. Фактически, р. Выполнение, % 1 Январь 27300,00 р. 39500,00 р. 2 Февраль 35500,00 р. 35600,00 р. 3 Март 42200,00 р. 44300,00 р. 4 Апрель 12500,00 р. 36200,00 р. 5 Май 25600,00 р. 35500,00 р. 6 Июнь 45800,00 р. 36900,00 р. 7 Июль 33100,00 р. 23500,00 р. 8 Август 25500,00 р. 26200,00 р. 9 Сентябрь 41200,00 р. 36000,00 р. 10 Октябрь 35200,00 р. 24200,00 р. 11 Ноябрь 23200,00 р. 36200,00 р. 12 Декабрь 33200,00 р. 27400,00 р.
class Main { public static void main(String[] args) { ArrayList<Integer> a = new ArrayList();
/** * Заполнение */ for (int i = 0; i < 50; i++) a.add(i, new java.util.Random().nextInt(100));
/** * Пузырь */ for (int i = 0; i < 50; i++) for (int j = 0; j < 50-i-1; j++) if (a.get(j) > a.get(j+1)){ int b = a.get(j); a.set(j, j+1); a.set(j+1, b); }
for (int i = 0; i < 50; i++) System.out.print(a.get(i) + " "); System.out.println("\n---");
/** * Удаляем */ a.remove(0);
for (int i = 0; i < 50-1; i++) System.out.print(a.get(i) + " "); } }
//PascalABC.Net 3.0, сборка 1064 const nn=50; var a:array[1..nn] of integer; i,n,imin:integer; begin Write('Введите количество элементов в массиве: '); Read(n); Randomize; Writeln('Исходный массив'); imin:=1; for i:=1 to n do begin a[i]:=Random(51)-25; Write(a[i],' '); if a[i]<a[imin] then imin:=i; end; Writeln; for i:=imin to n-1 do a[i]:=a[i+1]; Writeln('Массив-результат'); for i:=1 to n-1 do Write(a[i],' '); Writeln end.
А это версия для тех, кто думает, что Паскалю пора давно "на свалку": //PascalABC.Net 3.0, сборка 1064 begin var n:=ReadInteger('Введите количество элементов в массиве'); var a:=SeqRandom(n,-25,25).ToArray(); Writeln('Исходный массив:',#13#10,a); Writeln('Результат:',#13#10,a.Where(x->x<>a.Min)); end.
Тестовое решение: Введите количество элементов в массиве 15 Исходный массив: [-10,-15,8,-19,9,21,-22,-11,12,14,2,19,-25,-5,-15] Результат: [-10,-15,8,-19,9,21,-22,-11,12,14,2,19,-5,-15]
Можно сравнить понятность кода и его размер как со "школьным" решением, так и с программой на Java, приведенной в предыдущем ответе.
вот, держи, там в принципе всё просто, советую посмотреть консультацию) поставь лучший:)
Объяснение: