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

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

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 02.01.2010, 19:05   #1
Buyaka
 
Регистрация: 02.01.2010
Сообщений: 4
По умолчанию как на делфи написать прогу Ввести с клавиатуры целое число и определить делится ли оно нацело на9и на11

как на делфи написать прогу типа Ввести с клавиатуры целое число и определить делится ли оно нацело на 9 и на 11? Ответ можете прислате на майл Buyaka12345@mail.ru
Buyaka вне форума Ответить с цитированием
Старый 02.01.2010, 21:37   #2
Alex Cones
Trust no one.
Старожил
 
Аватар для Alex Cones
 
Регистрация: 07.04.2009
Сообщений: 6,526
По умолчанию

Код:
If (X mod 9 = 0) And (X mod 11 = 0) Then Все нормально
Код:
If X mod 99 = 0 Then Все нормально
Цитата:
Ответ можете прислате на майл Buyaka12345@mail.ru
Чтобы получить ответ на e-mail вышлите мне 200 рублей на веб мани
SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА.
МОЙ БЛОГ
GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ

Последний раз редактировалось Alex Cones; 02.01.2010 в 21:40.
Alex Cones вне форума Ответить с цитированием
Старый 02.01.2010, 22:28   #3
Buyaka
 
Регистрация: 02.01.2010
Сообщений: 4
По умолчанию

Цитата:
Сообщение от Alex Cones Посмотреть сообщение
Код:
If (X mod 9 = 0) And (X mod 11 = 0) Then Все нормально
Код:
If X mod 99 = 0 Then Все нормально
Чтобы получить ответ на e-mail вышлите мне 200 рублей на веб мани
А как писать начало и конец а не только код, а то я на делфи не программю. Заранее спасибо ) напиши плиз прогу целиком)
Buyaka вне форума Ответить с цитированием
Старый 02.01.2010, 22:59   #4
Levsha100
Заблокирован
Старожил
 
Регистрация: 20.07.2008
Сообщений: 4,032
По умолчанию

Вам с такими запросами во фриланс.
Levsha100 вне форума Ответить с цитированием
Старый 02.01.2010, 23:06   #5
Deamonig
Форумчанин
 
Аватар для Deamonig
 
Регистрация: 19.09.2009
Сообщений: 166
По умолчанию

Ставиш на форму делфи компонент Edit. После этого ставишь компонент Button и еще 1 Label. Дважды клацаеш мышкой по Button и пишеш туда код:
Код:
if (strtoint(edit1.text) mod 9 = 0) and (strtoint(edit1.text) mod 11 = 0)  then label1.caption:='делится на 9 и на 11';
if (strtoint(edit1.text) mod 9 = 0) and (strtoint(edit1.text) mod 11 <> 0)  then label1.caption:='делится только на 9';
if (strtoint(edit1.text) mod 9 <> 0) and (strtoint(edit1.text) mod 11 = 0)  then label1.caption:='делится только на 11';
if (strtoint(edit1.text) mod 9 <> 0) and (strtoint(edit1.text) mod 11 <> 0)  then label1.caption:='Не делится ни на 9 ни на 11';

Последний раз редактировалось Deamonig; 02.01.2010 в 23:29.
Deamonig вне форума Ответить с цитированием
Старый 02.01.2010, 23:15   #6
Buyaka
 
Регистрация: 02.01.2010
Сообщений: 4
По умолчанию

Спасибо и на этом)
Buyaka вне форума Ответить с цитированием
Старый 02.01.2010, 23:34   #7
Deamonig
Форумчанин
 
Аватар для Deamonig
 
Регистрация: 19.09.2009
Сообщений: 166
По умолчанию

Ну если еще не совсем понимаешь как сделать, то вот глянь пример
Вложения
Тип файла: rar x.rar (164.3 Кб, 14 просмотров)
Deamonig вне форума Ответить с цитированием
Старый 02.01.2010, 23:43   #8
DeKot
Участник клуба
 
Аватар для DeKot
 
Регистрация: 12.08.2008
Сообщений: 1,977
По умолчанию

Цитата:
а то я на делфи не программю.
Значит и среды Дельфи наверняка никакой нет.Даже если и есть случайно, то ТС это по барабану.
И пиши ему код, не пиши, с комментариями или без, то ...
Тема, явно, в "Шедевры ... " тянет.
И не сомневайся даже ... отдых - кайф, работа - лажа!
DeKot вне форума Ответить с цитированием
Старый 02.01.2010, 23:54   #9
Buyaka
 
Регистрация: 02.01.2010
Сообщений: 4
По умолчанию

Цитата:
Сообщение от Deamonig Посмотреть сообщение
Ну если еще не совсем понимаешь как сделать, то вот глянь пример

Спасибо огромное)))))
Buyaka вне форума Ответить с цитированием
Ответ


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

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

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
как ввести с клавиатуры двузначные и отрицательные числа - Assembler Варвара Помощь студентам 5 20.12.2009 14:29
С++ : Как разбить целое число на составляющие? Maruff Помощь студентам 6 17.06.2009 16:00
как ввести числа с клавиатуры и запомнить их в переменные mandarinka27 Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 2 18.05.2009 17:03
Ввести число N и определить делится ли оно без остатка на число M (VBA) Ivanich Microsoft Office Excel 7 24.04.2008 19:43