Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Разъясните решение! [D5, XP]


pro ©   (2008-04-30 22:02:00) 

Помогите решить задачу, я ее уже решил, но сказали что надо решать все через циклы.(ОГРОМНАЯ просьба, разъяснить решение)
Задача: Составьте программу, которая находит все равновеликие прямоугольники, стороны которых, выражены целыми a и b, ф площадь равна S(вводится с клавиатуры) (a и b в интервале от 1-го до 20-ти)


DVM   (2008-04-30 23:15:00) [1]


> pro   (30.04.08 22:02)  

вводим с клавиатуры S
1 цикл: Перебираем а от 1 до 20
 2 цикл: Перебираем b от 1 до 20
   находим S1 = A*B
   если S1=S то выводим A и B


korneley   (2008-04-30 23:04:00) [2]

Решение:
перебрать все равновеликие прямоугольники, стороны которых и площадь были введены с клавиатуры. В интервале от 1-го до 20-ти. Через циклы, естественно.


Игорь Шевченко   (2008-04-30 22:53:00) [3]

Ветки "дайте код для лабы/курсового/диплома/домашнего задания в школе" будут удаляться.
Вместе с авторами.


Palladin   (2008-04-30 22:10:00) [4]

а как ты ее решил?


Наверх

Титульная страница Поиск, карта сайта Написать письмо