![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу. Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста". Название темы слишком короткое или не отражает сути вашего вопроса. Тема исчерпала себя, помните, один вопрос - одна тема Прочитайте правила и заново правильно создайте тему. |
|
Опции темы | Поиск в этой теме |
![]() |
#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 |
![]() |
![]() |
#2 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
![]() Код:
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
![]() |
![]() |
#3 |
Новичок
Джуниор
Регистрация: 21.10.2018
Сообщений: 4
|
![]()
А через цикл do...loop можно выразить?
|
![]() |
![]() |
#4 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
![]()
можно, выражайте
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
![]() |
![]() |
#5 |
Новичок
Джуниор
Регистрация: 21.10.2018
Сообщений: 4
|
![]()
так подскажите как, ведь я попросить доделать через do...loop , а не переделать программу
Последний раз редактировалось Dimoon; 21.10.2018 в 20:37. |
![]() |
![]() |
#6 |
Старожил
Регистрация: 17.11.2010
Сообщений: 18,922
|
![]() Код:
Код:
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
|
![]() |
![]() |
#7 |
Новичок
СтарожилДжуниор
Регистрация: 05.02.2008
Сообщений: 9,487
|
![]()
см. #2 - там видно как сделать
см. #1 - где там хоть слово сделать с помощью do...loop. учитесь четко и ясно формулировать мысли удачи!
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
|
![]() |
![]() |
#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 |