Задано список. Написати програму формування іншого списку, в якому,
якщо еленти заданого списку не утворюють послідовності, яка зменшується,
то замінити його від‘ємні елементи одиницями.

залить в кувшин 3-х литровый воды до полна,перелить её в кувшин ёмкостью 8 литров.эту операцию проделать 3 раза,тогда в маленьком кувшине останется ровно литр воды.вылить всё из большого,залить туда воду из маленького(это 1 литр),затем залить в большой 3 маленьких и тогда получится 7 литров в большом кувшине.

исполняемые файлы:

test.exe = 459 кб

photo.exe = 117 кб

letter.com - 198 кб

графические файлы:

nature.jpg = 314 кб

program.bmp = 361 кб

текст. документы:

comp.doc = 238 кб

получается порядок:

test.exe 

program.bmp

nature.jpg

comp.doc

letter.com

photo.exe 

в феврале 1946 года был создан первый компьютер.

program zadacha1; var ves, rost, optves: integer; begin  write('введите массу тела');   read(ves);   write('введите рост в см');   read(rost);   optves: =rost-100;   if ves> optves then write('вам необходимо похудеть на', abs(optves-ves) );   if ves< optves then write('вам необходимо поправиться на', abs(optves-ves) );   if ves=optves then write ('ваш вес оптимальный')end.