Можно использовать любое слово женского рода, уменшительно-ласкательного значения. Например-мамочка, девочка и т.д.
мать любит дочь. дочь любит мать. кошка любит еду. еда любит кошку
X / 2^i = 25
x*0.4/2^i+t=15
отсюда видим , что 10=15-t т.е t=5 секунд
VBA:
Sub P()
Dim x As Double, y As Double
x = Val(InputBox("x = "))
If x <= 0 Then
y = Sin(2 * x)
ElseIf x <= 10 Then
y = Tan(x)
Else: y = 0.33 * x
End If
MsgBox (" Y = " & y)
End Sub
Я только сам цикл замены элементов массива напишу, до этого надеюсь смогешь. Если нет - в лс напиши)
Var
bufer: integer;
bufer: = 0;
Begin
For i = 1 to 4
Begin
bufer:= x[i];
x[i]:= y[i];
y[i]:= bufer;
End;
For i = 1 to 4
write(x[i], ' ');
writeln;
For i = 1 to 4
write(y[i], ' ');
End.