Var a,b,s: integer;
begin
write('Введите количество чисел в последовательности: ');
readln(a);
for b := 1 to a do
begin
write('Введите число: ');
readln(a);
if a mod 3 = 0 then
s:=s+a;
end;
writeln('Сумма чисел, кратных 3, равна: ',s)
end.
нарисовать блок схему

Uses graphabc;

var
    i, c: integer;
    ar: array[1..5]of integer;

begin
  for i := 1 to 5 do read(ar[i]);
  window.IsFixedSize := true;
  window.Init(0, 0, 800, 800, clDarkGray);
  window.CenterOnScreen;
  SetFontSize(32);
  for i := 1 to 5 do c := c + ar[i].ToString.Length;
  for i := 1 to 7 do writeln;
  write(' ':33 - c);
  for i := 1 to 5 do
  begin
    if(ar[i] mod 2 = 0) and (ar[i] mod 10 <> 0) then
     begin
      SetFontColor(clred);
      write(ar[i]);
    end
    else if(ar[i] mod 10 = 0) then
      begin
      SetFontColor(clblue);
      write(ar[i]);
    end
    else if(ar[i] mod 2 <> 0) then
    begin
      SetFontColor(clyellow);
      write(ar[i]);
    end
  end;
 end.

ответ:

объяснение:

1) модель - это система уравнений, описывающая поведение некоего объекта. компьютерной становится, если для решения этих уравнений используем программу на компьютере.

2) вычислительный эксперимент основывается на создании мм изучаемых объектов, которые формируются с некоторой особой структуры, способной отражать свойства объекта, проявляемые им в различных экспериментальных условиях, и включает в себя следующие этапы.

3) если имеется реальная система то для создания модели потребуется логико- модель которая с моделирующего алгоритма представит имитационную модель. имея имитационную модель можно провести эксперимент используя вычислительный эксперимент и это воздействие покажет нам реальную систему.

4)компьютерное техническими устройствами происходит в процессе расчетов по моделям в режиме реального времени.