MyMemory

Перевести в язык паскаль

derba

Тут 2 варианта.
Первый вариант:
B:=(Y-X)*(Y-2/(Y-X)/(1+SQR(Y-X));
Второй вариант. Более изящный, сам часто таким приемом пользуюсь: у нас повторяется выражение (Y-X) , заменим его временно переменной В, и далее высчитываем переменную В по заданию.

Т.е . будут 2 сторки.
B:=(Y-X) ;
B:=B*(Y-2/B)/(1+SQR(B));
Но букв будет меньше. И число тактов для вычисления уменьшатся.



Прикрепляйте нормально рисунки.

Миниатюры