rodsher7740
?>

Всем привет, можете с домашним заданием номер 18 кто проходил курс программирование для начинающих ЕШКО можете с последними 3 пунктами буду очень благодарна скину на карточку 20 грн за на шоколадку.​

Информатика

Ответы

Лилит_Шутова

Объяснение:

Язык Паскаль.

Модель:

Среднее число пассажиров, перевозимых по Кольцевой ветке равно 850 000 человек.

ДСЧ выбрасывает число из интервала 1-100000. Если это число четное, то его вычитаем из среднего, иначе прибавляем к среднему.

Листинг:

uses Crt;

const n=850000;

          m=7;

type Metro = array [1..m] of longint;

var     A: Metro;

            i: integer;

  P, max: longint;

begin

ClrScr; Randomize; max:=0;

for i:=1 to m do

  begin

     P:=1+random(100000);

     if (P mod 2 = 0) then P:=(-1)*P;

     A[i]:=n+P;

     if A[i]>max then max:=A[i];

       WriteLn ('   ', i, ': ',A[i]:5);

  end;

 WriteLn(' Max = ',max);

ReadLn;

end.

Результат работы - в прикрепленных фото.


Известно число пассажиров, перевозимое метрополитеном ежедневно в течение недели. определить число п
Известно число пассажиров, перевозимое метрополитеном ежедневно в течение недели. определить число п
Coverplus30

Объяснение:

Выборка по всем записям:

Выбрать конкретные поля из таблиц, расположить их в требуемом порядке, задать сортировку по нескольким критериям.

Выборка с условием:

Для некоторых полей добавляется условие в виде некоторого критерия для выборки записей.

Запрос с параметрами:

Условие отбора указывается в запросе неявно и формируется в момент обращения к запросу.

Запрос с вычисляемыми полями:

В запросе формируются новые поля, не существующие ни в одной из таблиц. Значения этих полей вычисляются по формулам, описываемым в запросе.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Всем привет, можете с домашним заданием номер 18 кто проходил курс программирование для начинающих ЕШКО можете с последними 3 пунктами буду очень благодарна скину на карточку 20 грн за на шоколадку.​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

boldireve617
danaya3005
mishamedbrat
fellybrossme
fiorire731
alfastore4
sveta300856729
nadezhda81
larinafashion829
qwerty
Зинина-Олесия
Вершинина1161
Zebra198383
yuda12
lebedev815
▲