40 взрослых и двое детей хотят переправиться на плоту на другую сторону реки, но плот выдержит либо 2их детей либо 1го взрослого. Решите задачу алгоритм-схемой на повторение. Всем поставлю высокую отметку.
Сначало надо переправить 2 детей, потом один вернётся. Переедет взрослый, а 2 ребёнок вернётся. И так пока все взрослые не переплывут. А в конце просто переплывут 2 ребёнка
В глубокой древности - на стенах пещер, на глиняных табличках, восковых дощечках, на скрижалях, потом на папирусе, бересте, пергаменте и т. д. Потом изобрели бумагу. В старину писали стилом, палочками, гусиными перьями, углями. Были ещё какие-то средства. В девятнадцатом веке изобрели пишущие машинки, фотоаппараты - ведь запечатление изображений на фотоплёнках и фотопластинках, это тоже запись информации. Также в 19 столетии появились граммофоны, патефоны, механические пианино, шарманки (музыка - тоже информация) . А уже ближе к нашим временам появились магнтитофоны, видеомагнтитофоны, потом лазерные устройства для записи на диски. Наконец, мобильники, фотоаппараты, компьютеры - это тоже накопители информации, которая хранится на дисках, флэшках, картах памяти и т. д. В общем, сам поищи в интернете, напиши разные варианты для поиска, например, "древние записи информации", "старинные носители информации", "папирус, глина, берестяные грамоты, письмена", "Александрийская библиотека" и т. д.
Var a, k, b, D, X, X1, X2 : real; begin writeln ('введите коэффициенты уравнения (a, k, b) '); readln(a,k,b); if a=0 then if k=0 then if b=0 then writeln('X - любое число') else writeln('корней нет! ') else begin X:=-b/k; writeln('X=',X:8:3); End else begin D:=k*k-4*a*b; if D<0 then writeln ('Корней нет! ') else begin X1:=(-k+sqrt(D))/2/a; X2:=(-k-sqrt(D))/2/a; writeln ('X1=', X1:8:3, ' X2=',X2:8:3); end; end; end.
Объяснение:
Сначало надо переправить 2 детей, потом один вернётся. Переедет взрослый, а 2 ребёнок вернётся. И так пока все взрослые не переплывут. А в конце просто переплывут 2 ребёнка