|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу. Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста". Название темы слишком короткое или не отражает сути вашего вопроса. Тема исчерпала себя, помните, один вопрос - одна тема Прочитайте правила и заново правильно создайте тему. |
|
Опции темы | Поиск в этой теме |
21.10.2018, 11:15 | #1 |
Новичок
Джуниор
Регистрация: 21.10.2018
Сообщений: 4
|
Доработать программу
Помогите доделать программу, вот ее условие: Натуральные числа а, b, с называются числами Пифагора, если выполняется
условие a^2 + b^2 = c^2. Напечатать все тройки чисел Пифагора, меньшие N. Sub test3() Dim a, b, c, N As Double N = Val(InputBox("Введите значение N")) Cells(1, 1) = "a" Cells(1, 2) = "b" Cells(1, 3) = "c" Do While c < N c = Sqr(a * a + b * b) a = a + 1 b = b + 1 Cells(c / 1 + 1, 1) = a Cells(c / 1 + 1, 2) = b Cells(c / 1 + 1, 3) = c Loop End Sub |
21.10.2018, 12:15 | #2 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
Код:
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
21.10.2018, 12:35 | #3 |
Новичок
Джуниор
Регистрация: 21.10.2018
Сообщений: 4
|
А через цикл do...loop можно выразить?
|
21.10.2018, 13:17 | #4 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
можно, выражайте
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
21.10.2018, 20:35 | #5 |
Новичок
Джуниор
Регистрация: 21.10.2018
Сообщений: 4
|
так подскажите как, ведь я попросить доделать через do...loop , а не переделать программу
Последний раз редактировалось Dimoon; 21.10.2018 в 20:37. |
21.10.2018, 21:08 | #6 |
Старожил
Регистрация: 17.11.2010
Сообщений: 18,922
|
Код:
Код:
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
|
21.10.2018, 21:10 | #7 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
см. #2 - там видно как сделать
см. #1 - где там хоть слово сделать с помощью do...loop. учитесь четко и ясно формулировать мысли удачи!
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
21.10.2018, 21:17 | #8 |
Новичок
Джуниор
Регистрация: 21.10.2018
Сообщений: 4
|
Спасибо, переделал и все заработало)
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Доработать программу на C++ | boreanz | Фриланс | 3 | 22.10.2015 23:05 |
доработать программу | ehanjaki | Помощь студентам | 1 | 12.07.2012 14:37 |
Доработать программу на С++ | sol1tary | Фриланс | 3 | 20.07.2011 10:15 |
Доработать программу за $ | lutdan | Фриланс | 3 | 09.05.2011 17:32 |
Доработать программу | stepanov_ivan | Помощь студентам | 1 | 03.01.2011 15:08 |