"Зачем человеку множество моделей?", отличное от этого: Человек в своей деятельности постоянно создает и использует модели окружающего мира. 1. Модели позволяют представить в наглядной форме объекты и процессы, недоступные для непосредственного восприятия: Физика: модели двигателей; География: глобус – модель земли(реальный размер очень большой) ; Химия – модели кристаллическая решетка, молекул (реальные размеры очень маленькие); Биология – по муляжу человека изучаем внутреннее строение2. при Проектировании механизмов и устройств, зданий, электрических цепей используют модели – чертежи и макеты. Математика – изучение объемных фигур3. Теоретические модели (для развития науки) – теории законов, гипотез и тд. Иногда создание таких моделей коренным образом меняет представления человека об окружаюжем мире: Коперник- гелиоцентрическая система мира, модель атома Резерфорда-Бора, геном человека)4. Художественное творчество - перенос реальной действительности на полотно, скульптура, театр, басня – отношения между животными – отношения между людьми
// Внимание! Если программа не работает, обновите версию!
procedure ListInsert(var L:List<real>;e,e1:real);
begin
for var i:=L.Count-1 downto 0 do
if L[i]=e then L.Insert(i+1,e1)
end;
begin
var P:=new List<real>;
Writeln('Введите последовательность чисел, завершив её нулём');
P.AddRange(ReadSeqRealWhile(a->a<>0));
var what:=ReadReal('Что вставить?');
var before:=ReadReal('После чего вставить?');
ListInsert(P,before,what);
Writeln('Результат:');
P.Println
end.
Пример
Введите последовательность чисел, завершив её нулём
3.8 -6.2 1.45 2.18 -6.2 14 2.7 2.18 2.18 3.8 15.4 0
Что вставить? 0.0001
После чего вставить? 2.18
Результат:
3.8 -6.2 1.45 2.18 0.0001 -6.2 14 2.7 2.18 0.0001 2.18 0.0001 3.8 15.4