Названия месяцев года в словарном порядке.

Август апрель декабрь июль июнь май март ноябрь октябрь сентябрь февраль январь

1. проводя вычислительный   эксперимент   можно проследить за изменениями .2.отличие моделирования от имитационного в том ,что  

имитационное моделирование заключается в простоте реализации вычислительного алгоритма и наглядности представляние результатов.   так имитационная модель ,это уменьшенная модель того , с чем мы   должны проводить эксперимент ,так например ракета , проводить эксперимент в реальности , т .е реальные размеры , всё рабочее и т.д опасно и дорого и никто не знает последствия ,а имея имитационную модель ракеты , мини-ракеты,можно провести эксперимент без вреда + ко всему узнать результаты.а моделирование концентрируется   только на проведении расчётов .

 

var

  a : array [1..9] integer;

  i : integer;

begin

  for i : = 1 to 9 do

    if i mod 3 = 1 then a[i] : = i

    else if i mod 3 = 2 then a[i] : = sqr (i - 1)

    else a[i] : = a[i - 1] div i;

  for i : = 1 to 9 do

    write (a[i], ' ');

end.

 

var

  b, a : array [1..15] of integer;

  i, sa, sb : integer;

begin

  randomize;

  sa : = 0; sb : = 0;

  for i : = 1 to 15 do

    begin

    a[i] : = trunc (random (100)) + 1;

    write (a[i], ' ');

    sa : = sa + a[i];

  end;

  writeln;

  for i : = 1 to 15 do

  begin

    b[i] : = sqr (a[i]) - a[i]);

    write (b[i], ' ');

    sb : = sb + b[i];

  end;

  writeln;

  writeln (abs (sb - sa));

end.