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

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

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

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

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

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 06.02.2013, 19:52   #1
Надежда_ИСУ
Пользователь
 
Регистрация: 24.01.2013
Сообщений: 65
По умолчанию Перевести задачу из C# в Delphi

Дано целое число N(>1). Если оно является простым, т.е. не имеет положительных делителей, кроме 1 и само на себя, то вывести TRUE, иначе вывести FALSE.
Код:
int n=29,k=1;
bool f=false;
do 
{if (n%++k==0)
f=true;
}
while (k<=Math.Sqrt(n));
 Console.Writeline(f.ToString().ToUpper());
Console.ReadLine();
Надежда_ИСУ вне форума
Старый 06.02.2013, 20:18   #2
Базиля
Участник клуба
 
Аватар для Базиля
 
Регистрация: 03.12.2009
Сообщений: 1,013
По умолчанию

Цитата:
Сообщение от Надежда_ИСУ Посмотреть сообщение
C# изучали 2 пары, ну как сказать изучали, это громко сказано...Преподаватель дал методичку..."Разберайтесь и сделайте задачи за неделю"...
С Делфи таже ситуация?
Ну прям совпадение какое-то
Базиля вне форума
Старый 06.02.2013, 20:36   #3
Надежда_ИСУ
Пользователь
 
Регистрация: 24.01.2013
Сообщений: 65
По умолчанию

Цитата:
Сообщение от Базиля Посмотреть сообщение
С Делфи таже ситуация?
Ну прям совпадение какое-то
Нет не совпадение, а преподаватель тот же...
Дело в том что я учусь на вечерней основе, мы всё по 3-4-5 пар изучаем, а сдавать приходится по полной программе, ну что поделать что всё так печально, надо было задачи 28 сдать, а я до сих пор сделать не могу, какие смогла сделать,сделала...
Надежда_ИСУ вне форума
Старый 06.02.2013, 20:41   #4
Базиля
Участник клуба
 
Аватар для Базиля
 
Регистрация: 03.12.2009
Сообщений: 1,013
По умолчанию

Дело не мое.
Но толку с такого "учусь" ? Смысл?
Цитата:
ну что поделать что всё так печально
Пожалуйста, спрашивайте. Что не понятно? Какие вопросы по учебе?
Вам помогут и все объяснят.
А этот подход, который у вас сейчас - попросить весь код решения и собственно не разобравшись скопировать в отчет (или что у вас там требуется для зачета), учебой не назовешь.
Базиля вне форума
Старый 06.02.2013, 20:48   #5
Надежда_ИСУ
Пользователь
 
Регистрация: 24.01.2013
Сообщений: 65
По умолчанию

Цитата:
Сообщение от Базиля Посмотреть сообщение
Дело не мое.
Но толку с такого "учусь" ? Смысл?
Да уже и сама не знаю, вот что-то начну делать не получается, ну а это всегда не приятно, вот и начинаешь строчить на форум, в надежде на лучшее...
Ну да ладно, ближе к делу!!!
Вот эти строки
Код:
if (n%++k==0),
while (k<=Math.Sqrt(n));
Расшифруйте пожалуйста???
Надежда_ИСУ вне форума
Старый 06.02.2013, 20:53   #6
kventin_zhuk
БНТУ ФИТР
Форумчанин
 
Аватар для kventin_zhuk
 
Регистрация: 20.05.2012
Сообщений: 315
По умолчанию

Надежда_ИСУ, первое - если остаток от деления n на k + 1 равен 0 , то .....
второе смысла не имеет, т.к циклически будет выполняться оператор ;
С++(console/builder/WinAPI/Linux), C#, Pascal, Delphi, Asm, Prolog.
< ----- Контакты
kventin_zhuk@live.com
kventin_zhuk вне форума
Старый 06.02.2013, 21:04   #7
Базиля
Участник клуба
 
Аватар для Базиля
 
Регистрация: 03.12.2009
Сообщений: 1,013
По умолчанию

что касается оператора условия
Код:
if (n%++k==0)
% - арифмитический оператор деления по модулю. Тем самым мы проверяем - есть ли остаток от деления числа n на k.
Также используется префиксная форма записи инкремента переменной k.
Насчет условия оператора цикла
Код:
while (k<=Math.Sqrt(n));
Что могу сказать по условию - нет смысла проверять на делимость без остатка чило превышающее половины самого делимого.
sqrt - квадратный корень

Насчет самой программы, откуда взяли такое решение? Оно неверное.

kventin_zhuk
Цитата:
второе смысла не имеет, т.к циклически будет выполняться оператор ;
Цикл с постусловием

Последний раз редактировалось Базиля; 06.02.2013 в 21:07.
Базиля вне форума
Старый 06.02.2013, 21:07   #8
Надежда_ИСУ
Пользователь
 
Регистрация: 24.01.2013
Сообщений: 65
По умолчанию

Цитата:
Сообщение от kventin_zhuk Посмотреть сообщение
Надежда_ИСУ, первое - если остаток от деления n на k + 1 равен 0 , то .....
второе смысла не имеет, т.к циклически будет выполняться оператор ;
Вот сейчас напишу как я понимаю эту задачу, а Вы исправите если что не так.
Код:
int n=29,k=1;(прописываем переменные);
bool f=false; переменной f присваиваем значение false;
do (зачем оно нужно???)
{if (n%++k==0) ну это я вроде поняла , а потом в Delphi then ??? если условие не выполнилось??? то f=true;
}
while (k<=Math.Sqrt(n)); это не надо???
 Console.Writeline(f.ToString().ToUpper());А вот это в скобках что такое???
Console.ReadLine();
Надежда_ИСУ вне форума
Старый 06.02.2013, 21:10   #9
Базиля
Участник клуба
 
Аватар для Базиля
 
Регистрация: 03.12.2009
Сообщений: 1,013
По умолчанию

Надежда_ИСУ
Для начала читаем:
Что такое циклы
Синтаксис операторов цикла в С# не отличается от С/С++.
Базиля вне форума
Старый 06.02.2013, 21:11   #10
kventin_zhuk
БНТУ ФИТР
Форумчанин
 
Аватар для kventin_zhuk
 
Регистрация: 20.05.2012
Сообщений: 315
По умолчанию

Базиля, Да ладно, я конечно с шарпом знаком, по плюсам пишу, но там же
Цитата:
while (k<=Math.Sqrt(n));
Это 100% зацикл, если условие истино.
С++(console/builder/WinAPI/Linux), C#, Pascal, Delphi, Asm, Prolog.
< ----- Контакты
kventin_zhuk@live.com

Последний раз редактировалось kventin_zhuk; 06.02.2013 в 21:14.
kventin_zhuk вне форума
Закрытая тема


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Перевести задачу на паскаль Faridik Паскаль, Turbo Pascal, PascalABC.NET 3 18.01.2012 19:36
Нужно перевести задачу с Си на Паскаль T_D Помощь студентам 0 22.12.2011 08:37
перевести из C++ в Delphi FileExists Помощь студентам 2 06.12.2008 21:17
Нужно перевести задачу с паскаля на DELPHI VDK23RUS Помощь студентам 8 16.06.2007 15:38