Var b,c:real;
<span>begin </span>
<span>b:=1; </span>
<span>c:=2; </span>
<span>repeat </span>
<span>b:=b+1; </span>
<span>c:=c*b; </span>
<span>until b=4; </span>
<span>writeln('Да'); </span>
<span>end. </span>
Что салат состоит из 4 составляющих
30 байт
1 символ = 1 байт
Монитор, клавиатура, мышь,компьютерный блок питания.