Kartrider
26.12.2021 20:21

первый х начало,второй х конец
составить программу табулирования функций на языке Pascal​


первый х начало,второй х конецсоставить программу табулирования функций на языке Pascal​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
ivbobkova1
23.05.2020 06:10

Объяснение:

Жизненные циклы проекта понимаются как определенные фазы, через которые проходит тот или иной замысел в процессе своей реализации, а также функционирования. 

Роль данного понятия может быть выражена в следующих утверждениях:

-        определяет продолжительность проекта, четко обозначая даты его начала и завершения; позволяет детализировать процесс реализации замысла, разбивая его на конкретные фазы;

-        дает возможность четко определить количество задействованного персонала, а также необходимые ресурсы;

-        облегчает процедуру контроля.

Так, принято выделять следующие этапы жизненного цикла проекта:

Инициация - происходит выдвижение идеи, а также подготовка проектных документов. Производится детальное обоснование, а также маркетинговые исследования, которые послужат подспорьем для реализации последующих стадий.

Планирование - определение сроков реализации замысла, разделение данных процессов на конкретные этапы, а также назначение исполнителей и ответственных лиц.

Исполнение - начинается сразу же после того, как были утверждены планы. Подразумевает реализацию в полном объеме всех намеченных действий.

Завершение - анализ полученных данных и контроль на предмет соответствия их запланированным. Данная обязанность в большинстве случаев возлагается на руководство.

0,0(0 оценок)
Ответ:
LidaTetyorkina
23.02.2021 01:49
//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.

Тестовое решение:
Введите количество элементов в массиве: 15
Исходный массив
17 -3 22 18 -13 -5 5 -15 -18 23 17 -2 -20 23 2
Массив-результат
17 -3 22 18 -13 -5 5 -15 -18 23 17 -2 23 2

А это версия для тех, кто думает, что Паскалю пора давно "на свалку":
//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, приведенной в предыдущем ответе.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота