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

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

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

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

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 12.10.2018, 16:14   #1
Rogue2106
Новичок
Джуниор
 
Регистрация: 12.10.2018
Сообщений: 1
По умолчанию Перевести программу из Pascal в VBA

Добрый день. Помоги перевести программу.

Var n,a,b,c,d:integer;
begin
readln(n);
for a:=1 to n-1 do
for b:=a to n-1 do
begin
d:=a*a+b*b;
c:=1;
while c*c<d do c:=c+1;
if (d=c*c)and(c<n) then writeln(a,' ',b,' ',c);
end;
end.

Вот условие задачи: Натуральные числа а, b, с называются числами Пифагора, если выполняется
условие a2 + b2 = c2. Напечатать все тройки чисел Пифагора, меньшие N.
Rogue2106 вне форума
Старый 13.10.2018, 08:18   #2
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,856
По умолчанию

Ввиду резко возросшей активности студентов-бездельников
темы, не содержащие своих наработок, будут закрываться.


В этом разделе форума помогают разобраться в Вашем решении, а не штампуют лабы одну за другой.

Нет желания делать работу самостоятельно - обращайтесь в раздел Фриланс (там Вам всегда помогут, но не бесплатно)
Нет желания платить - выкладывайте свои наработки, и говорите, что конкретно у Вас не получается. В этом случае вы наверняка получите помочь, и ждать её придётся совсем недолго.

Впрочем, есть ещё раздел Помощь студентам - если хочется халявы, а денег жалко, - можете обратиться туда (есть небольшой шанс, что там кто-нибудь решит ваши задачки)

Ну а если наработок нет, а вы все же надеетесь получить готовое решение от профессионалов, - создавайте новую тему, и сразу указывайте цену, которую Вы готовы заплатить за решение.
EducatedFool вне форума
Закрытая тема


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

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Перевести программу с Pascal на С++ dimadobry Помощь студентам 1 28.05.2017 21:29
Перевести программу из Pascal в C++ Starget-93 Помощь студентам 2 13.11.2014 14:04
VBA как можно перевести код с Pascal Ken_Watanabe Помощь студентам 0 10.11.2014 05:56
Перевести готовый код из Pascal в VBA Ken_Watanabe Microsoft Office Excel 1 04.11.2014 10:44
может кто перевести программу из pascal в C# medved2800 Помощь студентам 0 14.02.2013 18:21