|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
14.01.2013, 12:24 | #1 |
Пользователь
Регистрация: 30.06.2012
Сообщений: 11
|
деление без остатка
Здравствуйте! Пытаюсь создать на Delphi простенькую игру "Развивай свой интелект". Познакомился с этим языком программирования недавно поэтому есть некотрые вопросы. У меня есть 3 случайных числа: a, b, c. У меня на получается сделать так, чтобы при делении числа а на число b получалось целое число без остатка. Как сделать чтобы а делилось b без остатка?
|
14.01.2013, 12:30 | #2 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
a div b дает деление без остатка. В случае с целыми
В случае с вещественными можно так: trunc(a) div trunc(b)
I'm learning to live...
|
14.01.2013, 16:22 | #3 |
Пользователь
Регистрация: 30.06.2012
Сообщений: 11
|
Да. У меня такая ситуация: случайно берутся 2 числа(a и b). Если a не делится на b, то надо заменить или а, или b, или оба числа. Я делал так:
... c:= a/b; if tranc(c) <> 0 then repeat ......; until tranc(c) = 0 else ........... На месте второго многоточия я не знаю что поставить. Я пробовал поставить туда вот это: а:= а+1; но при запуске программы она зависала. Не могу додуматься как решить эту проблему. |
14.01.2013, 16:38 | #4 | |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Цитата:
I'm learning to live...
|
|
14.01.2013, 16:54 | #5 | |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
Цитата:
Впрочем, абсолютно не ясно, какую задачу изначально решает TC... |
|
15.01.2013, 11:34 | #6 |
Пользователь
Регистрация: 30.06.2012
Сообщений: 11
|
Поправка: если а не делится на b без остатка.
|
15.01.2013, 11:42 | #7 |
Made In USSR!
Старожил
Регистрация: 01.09.2010
Сообщений: 3,657
|
Код:
"...В жизни я встречал друзей и врагов.В жизни много всего перевидал.Солнце тело мое жгло, ветер волосы трепал,но я смысла жизни так и не узнал..."
(c) Юрий Клинских aka "Хой" |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Написать условный оператор, если А делится без остатка на В | harvey | Помощь студентам | 1 | 10.10.2012 22:11 |
Деление числа без остатка | grom333 | Общие вопросы Delphi | 6 | 18.01.2012 22:28 |
Деление многочленов. Нахождение остатка | @Manya@ | Общие вопросы C/C++ | 2 | 05.05.2010 11:36 |
Делить без остатка | rangel | PHP | 4 | 30.07.2009 14:31 |
Составить программу, определяющую количество чисел, делящихся без остатка на три | phoenixSV | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 05.12.2008 15:05 |