Sos sos написать алгоритм "как сварить борщ" например: достать кастрюлю и т.

1.  вымыть, очистить и нарезать тонкой соломкой свеклу, морковь, картофель и лук. капусту тонко нашинковать, помидоры ошпарить кипятком, снять кожуру и нарезать кубиками. чеснок очистить и раздавить.2.   в кастрюле вскипятить воду, посолить, положить картофель и капусту и варить  на небольшом огне. в сковороде разогреть растительное масло, обжарить лук и морковь около 5 минут, затем добавить половину свеклы, уксус и сахар, перемешать и тушить 10 минут. 3.  оставшуюся свеклу сложить в миску, залить кипятком, добавить 1 ч. л. уксуса и дать настояться – получившийся свекольный сок может понадобится в конце приготовления для того, чтобы сделать цвет борща более насыщенным. 4.  в сковороду с овощами добавить помидоры, посолить и поперчить по вкусу, накрыть крышкой и тушить 20 минут. 5.  в кастрюлю с картофелем и капустой добавить тушеные овощи и лавровый лист. довести до кипения, снять пену, потом добавить в борщ чеснок. накрыть  крышкой и сразу снять с огня, после чего дать настояться 10 мин. 6.  добавить в суп процеженный свекольный сок и перемешать.

используем рекурентную формулу, чтобы программу

а[n+1]=1/4

a[n]=1/2

t=(1/4)/(1/2)=1/2

a[n+1]=a[n]*1/2

program;

var  n: integer; abs,s,a: real;

begin

a: =1;

eps: =1;

s: =1;

repeat

a: =a*1/2;

abs: =abs(a);

s: =s+a;

until abs< 0.001;

writeln(s);

end;

одновременно нажать alt и 3 (на цифровой клавиатуре с права)

♥