Форум программистов, компьютерный форум, киберфорум
Наши страницы
QBasic
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
informatic92
0 / 0 / 0
Регистрация: 23.09.2010
Сообщений: 23
1

Найти размеры всех прямоугольников, площадь которых равна натуральному числу S

29.03.2011, 20:06. Просмотров 1019. Ответов 5
Метки нет (Все метки)

Найти размеры всех прямоугольников площадь которых равна натуральному числу S, стороны которых выражены натуральными числами. Помогите составить программу, пожалуйста!
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
29.03.2011, 20:06
Ответы с готовыми решениями:

Определить количество трехзначных чисел, сумма цифр которых равна данному натуральному N
Определить количество трехзначных чисел, сумма цифр которых равна данному натуральному N...

Необходимо найти длины сторон всех прямоугольников, площадь которых равна заданному натуральному числу S
Необходимо найти длины сторон всех прямоугольников, площадь которых равна заданному натуральному...

Нахождение всех прямоугольников, площадь которых равна q
Дано натуральное число q. Требется написать программу для нахождения всех прямоугольников, площадь...

Нахождение всех прямоугольников, площадь которых равна q
Дано натуральное число q. Требется написать программу для нахождения всех прямоугольников, площадь...

Найти количество простых чисел, сумма цифр которых равна натуральному числу
В одномерном массиве, состоящем из N натуральных чисел найти количество простых чисел, сумма цифр...

5
-immortal-
60 / 60 / 43
Регистрация: 31.01.2011
Сообщений: 105
29.03.2011, 20:15 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

PureBasic
1
2
3
4
5
6
7
8
9
10
CLS
INPUT "S"; s
IF s<>INT(s) THEN s=INT(s)
FOR i = 1 TO s
    a = i
    FOR i2 = 1 TO s
        b = i2
        IF (a * b) = s THEN PRINT "storona A:"; a; "storona B:"; b
    NEXT
NEXT
1
кот Бегемот
Платежеспособный зверь
8539 / 3968 / 1552
Регистрация: 28.10.2009
Сообщений: 10,332
29.03.2011, 22:24 3
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

PureBasic
1
2
3
4
input s
for i=1 to int(sqr(s))
if s/i=s\i then print i,s/i
next
1
informatic92
0 / 0 / 0
Регистрация: 23.09.2010
Сообщений: 23
07.04.2011, 19:57  [ТС] 4
Огромное спасибо!
0
MOHCTP
293 / 205 / 2
Регистрация: 20.02.2011
Сообщений: 551
07.04.2011, 22:46 5
A все-таки, тут речь идет о прямоугольниках, или о треугольниках, как в заголовке темы? Разница-то ощутимая...
0
informatic92
0 / 0 / 0
Регистрация: 23.09.2010
Сообщений: 23
10.04.2011, 14:13  [ТС] 6
Пардон, в теме опечатка - моя вина)) Парни всё правильно решили
0
10.04.2011, 14:13
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.04.2011, 14:13

Написать программу для нахождения всех прямоугольников, площадь которых равна q
Помогите решить задачу, пожалуйста. &quot;Дано натуральное число q. Требуется написать программу для...

Нахождение всех прямоугольников, площадь которых равна q и стороны выражены натуральными числами
помогите решить задачу) Исходное данное - натуральное число q, выражающее площадь. Напишите...

Распечатать все трёхзначные числа, сумма цифр которых равна заданному натуральному числу
Очень Нужно Друзья!!! Буду благодарен при содействии. Распечатать все трехзначные числа ,сумма...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru