Написать код в логомиры 3.0 для этого

1. uses crt; var n: string; begin read(n);   writeln(strtoint(n[1])*strtoint(n[2])*strtoint(n[3])); end.2.uses crt; var n,i: integer; res: double; beginread(n); for i: =1 to n dores: =res+cos(1/i); writeln(res: 5: 3); end.3.uses crt; var n,i: integer; mult: real; a: array[1..100] of real; beginmult: =1; writeln('input n and elements of array.'); read(n); for i: =1 to n dobeginread(a[i]); if i mod 2=0 then  mult: =mult*a[i]; end;   writeln(mult); end.4.uses crt; var n,i,sum: integer; a: array[1..100] of integer; beginwriteln('input n and elements of array.'); read(n); for i: =1 to n doread(a[i]); i: =1; while (a[i]< > 0) and (i< =n) dobeginif a[i] mod 2=0 thensum: =sum+a[i]; i: =i+1; end; writeln(sum); end.

По , моделирование это изучение  явления или предмета по их модели. 1) атом. на самом деле его модель является лишь примерной, никто не видел, действительно ли он состоит так, как нам говорят, но принято, что мы его знаем. поэтому его изучение проходит на модели. 2) самолет. никто обычному человеку не даст самолет, на изучение, лишь за деньги возможно купля самолета и его изучения, поэтому ваш единственный способ его изучения - это моделирование. 3) взрыв. аналогично самолету, будете ли вы совершать взрывы для его изучения. вы можете использовать только  то, что вам дано или же сведения, полученные при случайном взрыве. всякие "разрушители легенд" исключение. 4) так же мы не видели что внутри земли, мы лишь можем предполагать. ибо радиус земли 6371км, а люди пробились лишь на  7 600 м, что  пренебрежено  мало.p.s. земля (с большой буквы)- планета, земля (с маленькой) - почва.p.s.s. надеюсь на и лучший ответ.