Перераспределить значения переменных X и Y (перевести с Pascal) - VB

Узнай цену своей работы

Формулировка задачи:

1.Перераспределить значения переменных X и Y так, чтобы в X оказалось меньшее из этих значений, а в Y — большее.
Вот решение в PascalABChttp://www.cyberforum.ru/pascal/thread155071.html
null

Решение задачи: «Перераспределить значения переменных X и Y (перевести с Pascal)»

textual
Листинг программы
Sub SwapXY(x as double, y as double)
Dim tmp as double
      If (x > y) then
         tmp=x
         x=y
         y=tmp
      Ens if      
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

15   голосов , оценка 4 из 5
Похожие ответы