HOME    FORUMS    MEMBERS    RECENT POSTS    LOG IN  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > ПРОГРАММИРОВАНИЕ > С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

  #5281  
Старый 22.12.2009, 02:55
DimkO
Новичок
Регистрация: 16.11.2008
Сообщений: 27
Провел на форуме:
104236

Репутация: 6
По умолчанию

та вариантов куча,нужно просто задать такое условие что бы не выходило сразу и все,а если есть еще какое то ,при котором прога заканчивает цыкл,как вариант можно поставить условие что при таком разкладе его пропускать - "continue".Но опять таки,знать бы конкретно что ты хочешь,было бы легче ответить на вопрос...
 
Ответить с цитированием

  #5282  
Старый 22.12.2009, 10:42
slesh
Reservists Of Antichat - Level 6
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме:
3288241

Репутация: 3349


Отправить сообщение для slesh с помощью ICQ
По умолчанию

Код:
repeat
 if (условие) then break;
until false;
 
Ответить с цитированием

  #5283  
Старый 22.12.2009, 11:19
qwert135
Познающий
Регистрация: 22.11.2009
Сообщений: 53
Провел на форуме:
33126

Репутация: 0
По умолчанию

дана функция на определенном интервале с определенным шагом.Нужно вычислить значение функции,вычисления надо закончить когда |Ak|<e.Но нужно это условие сделать сложным,то есть цикл не завершаться после первого круга даже если будет выполнено первое условие
 
Ответить с цитированием

  #5284  
Старый 22.12.2009, 11:50
qwert135
Познающий
Регистрация: 22.11.2009
Сообщений: 53
Провел на форуме:
33126

Репутация: 0
По умолчанию

У меня код такой: q:=1; repeat q:=q+1; until (abs(Ak)<e) and (а вот тут какое условие задать для q я хз).Сори что так пишу,я с телефона
 
Ответить с цитированием

  #5285  
Старый 22.12.2009, 17:56
Thenno
Участник форума
Регистрация: 03.07.2009
Сообщений: 151
Провел на форуме:
638378

Репутация: 41
Отправить сообщение для Thenno с помощью ICQ
По умолчанию

Цитата:
Сообщение от qwert135  
Всем привет.У меня такой вопрос.Какое условие надо задать чтобы цикл repeat/until выполнялся более одного раза,то есть цикл может закончится как минимум на втором круге.Язык паскаль.Заранее спасибо
Код:
k:=0;
repeat
  k:=k+1;
  <твой код>;
until (k>1) and (<твое другое условие>);
 
Ответить с цитированием

  #5286  
Старый 22.12.2009, 23:16
SHAXID
Познающий
Регистрация: 13.12.2007
Сообщений: 56
Провел на форуме:
469345

Репутация: 51
Отправить сообщение для SHAXID с помощью ICQ
По умолчанию

Проблема возникла такая:
Существует БД Access, связанная с проектом в Delphi..в БД, значит, у одного из элементов стоит тип данных: Дата/время..в то же время в проекте работает всё на "ура", но в Edit, который связан с этим элементом в БД, можно вводить только числовое значение - дата/время..
Собственно что нужно. А нужно сделать так, чтобы в этот же Edit можно было вводить текстовую инфу и чтоб она так же заносилась в БД.
В самой базе уже пробовал менять тип данных, но при компиляции выводится ошибка и ругается именно на тип...
 
Ответить с цитированием

  #5287  
Старый 23.12.2009, 02:36
mr_walker
Познающий
Регистрация: 09.08.2009
Сообщений: 39
Провел на форуме:
298385

Репутация: 75
По умолчанию

Я уже спрашивал дважды... меня проигнорили... хм.... рискну еще раз!
Как на инди хттп сервере реализовать поддержку пхп???
помогите кто чем может... не проходите мимо! я вам, блин, хоть станцую... стоя раком на голове....
 
Ответить с цитированием

  #5288  
Старый 23.12.2009, 03:09
Pr0mo
Новичок
Регистрация: 26.11.2009
Сообщений: 20
Провел на форуме:
88440

Репутация: 60
По умолчанию

Цитата:
Сообщение от mr_walker  
Я уже спрашивал дважды... меня проигнорили... хм.... рискну еще раз!
Как на инди хттп сервере реализовать поддержку пхп???
помогите кто чем может... не проходите мимо! я вам, блин, хоть станцую... стоя раком на голове....
У компонента idHTTPServer имеется процедура обработки GET запросов - OnCommandGet. В ней есть структура ARequestInfo: TIdHTTPRequestInfo и AResponseInfo: TIdHTTPResponseInfo соответственно. Заполняются надлежащим образом, типа :

ARequestInfo.Host = '127.0.0.1:5555'
ARequestInfo.Document = '/index.php'
...
AResponseInfo.ContentText := 'ok';
AResponseInfo.WriteContent;


p.s : Каков вопрос - таков ответ!
 
Ответить с цитированием

  #5289  
Старый 23.12.2009, 06:52
RumShun
Постоянный
Регистрация: 27.10.2008
Сообщений: 380
Провел на форуме:
1249808

Репутация: 149
Отправить сообщение для RumShun с помощью ICQ
По умолчанию

SHAXID в
dt:TdateTime;
...
dt:=strtodate(edit1.text);
...
dt уже заносишь в базу, вообще посмотри функции пераобразования типов в справочнике делфи.
 
Ответить с цитированием

  #5290  
Старый 23.12.2009, 19:17
SHAXID
Познающий
Регистрация: 13.12.2007
Сообщений: 56
Провел на форуме:
469345

Репутация: 51
Отправить сообщение для SHAXID с помощью ICQ
По умолчанию

Цитата:
Сообщение от RumShun  
SHAXID в
dt:TdateTime;
...
dt:=strtodate(edit1.text);
...
dt уже заносишь в базу, вообще посмотри функции пераобразования типов в справочнике делфи.
бле, что-то не до конца недопонял..можно, плиз, поподробнее описать?)
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[jQuery] - Задай вопрос, получи ответ Isis PHP 62 25.12.2009 03:25



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ