Форум Кургана и Курганской области и наших друзей

Зима. Форум Кургана и Курганской области и наших друзей
16 Октябрь 2019, 10:41:13 *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

Войти
Новости:
 
   Начало   Помощь Войти Регистрация  
Страниц: [1]   Вниз
  Печать  
Автор Тема: Помогите пожалуйста люди написать программу на Паскаль!  (Прочитано 2809 раз)
0 Пользователей и 1 Гость смотрят эту тему.
kriolspan1331
Коллежский регистратор


Карма: 0
Offline Offline

Сообщений: 5


Награды
« : 14 Февраль 2009, 23:52:17 »

 В замешательстве Пифагоровы числа – числа , для которых выполняется равенство a*a + b*b = c*c. Найти все пифагоровы числа не превышающие 20. Например числа 3, 4, 5 = 3(в квадрате)+4(в квадрате)=5(в квадрате)

« Последнее редактирование: 14 Февраль 2009, 23:55:27 от kriolspan1331 » Записан
ysv
Гость
« Ответ #1 : 15 Февраль 2009, 00:06:32 »

В лоб.
Три цикла вложенных где три переменных увеличиваются на 1.
При равенстве согласно условию - числа выводятся.
Записан
kriolspan1331
Коллежский регистратор


Карма: 0
Offline Offline

Сообщений: 5


Награды
« Ответ #2 : 15 Февраль 2009, 00:10:26 »

В лоб.
Три цикла вложенных где три переменных увеличиваются на 1.
При равенстве согласно условию - числа выводятся.


про вложенные друг в друга цыклы я понял, я сделать не могу так что бы при тестировании работала((( Грустный
Записан
ysv
Гость
« Ответ #3 : 15 Февраль 2009, 00:32:58 »

Публикуй текст - подскажу.
Записан
kriolspan1331
Коллежский регистратор


Карма: 0
Offline Offline

Сообщений: 5


Награды
« Ответ #4 : 15 Февраль 2009, 00:53:32 »

Публикуй текст - подскажу.


какой текст? у меня только условие задачи и всё.....
Записан
pavel_8729
Тайный советник
*********

Карма: 485
Offline Offline

Пол: Мужской
Сообщений: 5497

90027_veteran.gif 11834_medal2.gif


Награды
« Ответ #5 : 15 Февраль 2009, 00:57:48 »

я сделать не могу так что бы при тестировании работала((( Грустный
какой текст? у меня только условие задачи и всё.....
вы что, компилятор в слух уговаривали?  Геймер
Записан
kriolspan1331
Коллежский регистратор


Карма: 0
Offline Offline

Сообщений: 5


Награды
« Ответ #6 : 15 Февраль 2009, 01:11:44 »

вы что, компилятор в слух уговаривали?  Геймер

я не очень-то в теме ,что касается разбора кто есть кто, мне просто требуется задачу сделать, я туплю, не могу её сделать........кто бы помог...
Записан
LKA
Действительный статский советник
********

Карма: 529
Offline Offline

Пол: Мужской
Сообщений: 4174


11834_medal2.gif 90027_veteran.gif

хардварепатологоанатом [病理学家硬件]


WWW Награды
« Ответ #7 : 15 Февраль 2009, 01:21:51 »

"Помочь сделать" и "сделать ее за вас" - довольно разные вещи, не находите?
Записан

В кривых руках и коврик глючит.
pavel_8729
Тайный советник
*********

Карма: 485
Offline Offline

Пол: Мужской
Сообщений: 5497

90027_veteran.gif 11834_medal2.gif


Награды
« Ответ #8 : 15 Февраль 2009, 01:29:43 »

бугога
Записан
REPS
Корабельный секретарь
***

Карма: -9
Offline Offline

Пол: Мужской
Сообщений: 132

Жить хорошо. А регулярно жить еще лучше!


WWW Награды
« Ответ #9 : 15 Февраль 2009, 20:04:24 »

ТЕОРЕМА. Все пифагоровы тройки можно найти по формуле:

a=2pq,
b=p2 –q2,
c=p2 +q2,
где p и q любые натуральные числа.
Например:p=2, q=1

a=2pq
b=p2-q2
c=p2+q2

a=2*2*1
b=22-12
c=22+12

A=4
B=3
C=5
Записан

kriolspan1331
Коллежский регистратор


Карма: 0
Offline Offline

Сообщений: 5


Награды
« Ответ #10 : 15 Февраль 2009, 23:41:55 »

ТЕОРЕМА. Все пифагоровы тройки можно найти по формуле:

a=2pq,
b=p2 –q2,
c=p2 +q2,
где p и q любые натуральные числа.
Например:p=2, q=1

a=2pq
b=p2-q2
c=p2+q2

a=2*2*1
b=22-12
c=22+12

A=4
B=3
C=5

благодарю за помощь.
Записан
Страниц: [1]   Вверх
  Печать  
 
Перейти в:  

Powered by MySQL Powered by PHP Powered by SMF 1.1.11 | SMF © 2006-2008, Simple Machines LLC
rss | wap
Valid XHTML 1.0! Valid CSS!