Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 16.04.2011, 15:04   #1
Марина01
Пользователь
 
Регистрация: 16.04.2011
Сообщений: 13
Печаль Ветвящийся алгоритм

В visual basic написать формулу..

Даны два числа А и В. Если А>В, то А присвоить значение В, а В - значение А. Вывести полученные значения А и В. (Ветвящийся алгоритм)
Попробывала написать,не получилось что не так подскажите пожалуйста(
Sub условие()
Dim A, B
A = Val(InputBox("Введите число A"))
B = Val(InputBox("Введите число B"))
If A > B Then A "присвоить значение B", "B значение А"
End If


End Sub
Марина01 вне форума Ответить с цитированием
Старый 16.04.2011, 16:03   #2
x_proof
 
Регистрация: 18.01.2011
Сообщений: 7
По умолчанию

чтобы поменять местами 2 переменные, нужна 3я как временная. А вот это непонятно вообще: "B значение А"
x_proof вне форума Ответить с цитированием
Старый 16.04.2011, 17:43   #3
Марина01
Пользователь
 
Регистрация: 16.04.2011
Сообщений: 13
По умолчанию

а какую пиременную??
Марина01 вне форума Ответить с цитированием
Старый 16.04.2011, 17:53   #4
Alex11223
Старожил
 
Аватар для Alex11223
 
Регистрация: 12.01.2011
Сообщений: 19,500
По умолчанию

ну вы, как я понимаю (ни разу не сталкивался с visual basic), выражением
Код:
"B значение А"
хотите переменной В присвоить то значение, которое было присвоено А в начале программы. Но переменной А уже было присвоено значение В (т.е. в итоге вы получите обе переменные со значением, которое было у В а не поменяете их местами).
Чтобы этого не произошло надо использовать третью переменную (например ее можно назвать temp) для сохранения в ней значения А перед
Код:
A "присвоить значение B"
.
Ушел с форума, https://www.programmersforum.rocks, alex.pantec@gmail.com, https://github.com/AlexP11223
ЛС отключены Аларом.

Последний раз редактировалось Alex11223; 16.04.2011 в 17:55.
Alex11223 вне форума Ответить с цитированием
Старый 16.04.2011, 18:47   #5
Марина01
Пользователь
 
Регистрация: 16.04.2011
Сообщений: 13
По умолчанию

Вы правильно поняли,не сталкивалась с visual basic(((
мало что в нём понимаю..(
Марина01 вне форума Ответить с цитированием
Старый 16.04.2011, 18:54   #6
Alex11223
Старожил
 
Аватар для Alex11223
 
Регистрация: 12.01.2011
Сообщений: 19,500
По умолчанию

В сообщение выше имелось в виду, что ни разу не сталкивался я и соответственно не понимаю корректно ли вообще выражение
Код:
A "присвоить значение B", "B значение А"
Но вообще ошибка в алгоритме в том, что, как уже написано выше 2 раза, для того чтобы поменять местами 2 переменные требуется третья переменная для сохранения в ней значения одной из переменных.
Ушел с форума, https://www.programmersforum.rocks, alex.pantec@gmail.com, https://github.com/AlexP11223
ЛС отключены Аларом.
Alex11223 вне форума Ответить с цитированием
Старый 16.04.2011, 18:54   #7
Mad_Cat
Made In USSR!
Старожил
 
Аватар для Mad_Cat
 
Регистрация: 01.09.2010
Сообщений: 3,657
По умолчанию

доделайте)
Код:
Sub условие()
Dim A, B,C
A = Val(InputBox("Введите число A"))
B = Val(InputBox("Введите число B"))
If A > B Then 
C=A 
A=B 
B=C
End If
"...В жизни я встречал друзей и врагов.В жизни много всего перевидал.Солнце тело мое жгло, ветер волосы трепал,но я смысла жизни так и не узнал..."
(c) Юрий Клинских aka "Хой"
Mad_Cat вне форума Ответить с цитированием
Старый 16.04.2011, 18:59   #8
Летучий_СкилетиК
Форумчанин
 
Аватар для Летучий_СкилетиК
 
Регистрация: 04.02.2011
Сообщений: 260
По умолчанию

А вот вариантик без третьей переменной:
Код:
...
If A > B Then 
         A = A + B
         B = A - B
         A = A - B
END IF
....
Летучий_СкилетиК вне форума Ответить с цитированием
Старый 16.04.2011, 19:29   #9
Марина01
Пользователь
 
Регистрация: 16.04.2011
Сообщений: 13
По умолчанию

Спасибо вам,теперь поняла=)
Марина01 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Алгоритм patrol Общие вопросы Delphi 1 11.12.2010 17:34
Алгоритм на Си Максим34 Помощь студентам 0 31.05.2010 15:33
Волновой алгоритм (алгоритм Ли) MrRockchip Общие вопросы C/C++ 4 10.05.2010 13:26
Алгоритм JoSkream Общие вопросы C/C++ 5 04.06.2009 23:22
Алгоритм Rifler Паскаль, Turbo Pascal, PascalABC.NET 3 30.03.2008 01:33