ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2
Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей. Здесь обсуждаются безопасность, программирование, технологии и многое другое. Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
Вернуться   Форум АНТИЧАТ > Программирование > С/С++, C#, Delphi, .NET, Asm
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

  #2601  
Старый 01.04.2010, 12:43
Аватар для new-sl
new-sl
Познающий
Регистрация: 27.05.2009
Сообщений: 44
Провел на форуме:
105684

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

всем ривет я хачу написать шахматы вот тока знаний у меня нехватает пока для этого посоветуите книгу или статю на ету тему где нетолко стоит Альфа-бета-отсечение а полностю код харошо розоброный и понятно описнаый скачал книгу "програмирование шахмат и других логичиских игр " тока там описание на С понять в принципи мошно но там работает он побитно а не обэктно орентировано да и обяснает както неочен на мои взгля или может я тупои просто кароче ест ли ченит в етом роде пишите буду благодарен !!!
 
Ответить с цитированием

  #2602  
Старый 01.04.2010, 16:39
Аватар для n1ghtstalker
n1ghtstalker
Познающий
Регистрация: 28.09.2008
Сообщений: 65
Провел на форуме:
152084

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

Цитата:
Сообщение от new-sl  
всем ривет я хачу написать шахматы вот тока знаний у меня нехватает пока для этого посоветуите книгу или статю на ету тему где нетолко стоит Альфа-бета-отсечение а полностю код харошо розоброный и понятно описнаый скачал книгу "програмирование шахмат и других логичиских игр " тока там описание на С понять в принципи мошно но там работает он побитно а не обэктно орентировано да и обяснает както неочен на мои взгля или может я тупои просто кароче ест ли ченит в етом роде пишите буду благодарен !!!
молодой человек для начала вам бы прочитать это:
_http://www.google.ru/search?hl=ru&source=hp&q=%D1%81%D0%BA%D0%B0%D1%87% D0%B0%D1%82%D1%8C+%D0%BE%D1%80%D1%84%D0%BE%D0%B3%D 1%80%D0%B0%D1%84%D0%B8%D1%87%D0%B5%D1%81%D0%BA%D0% B8%D0%B9+%D1%81%D0%BB%D0%BE%D0%B2%D0%B0%D1%80%D1%8 C+%D1%80%D1%83%D1%81%D1%81%D0%BA%D0%BE%D0%B3%D0%BE +%D1%8F%D0%B7%D1%8B%D0%BA%D0%B0&lr=&aq=0&aqi=g8&aq l=&oq=%D1%81%D0%BA%D0%B0%D1%87%D0%B0%D1%82%D1%8C+% D0%BE%D1%80%D1%84%D0%BE%D0%B3%D1%80%D0%B0%D1%84&gs _rfai=
 
Ответить с цитированием

  #2603  
Старый 01.04.2010, 16:46
Аватар для LASS0
LASS0
Познающий
Регистрация: 03.01.2009
Сообщений: 33
Провел на форуме:
1536015

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

Помогите
Pascal:
В строке найти слова, которые содержат хотя бы одну букву 'k'
 
Ответить с цитированием

  #2604  
Старый 01.04.2010, 17:13
Аватар для Soherox
Soherox
Познающий
Регистрация: 17.02.2010
Сообщений: 45
Провел на форуме:
195184

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

LASS0..держи, слова разделяются пробелами
PHP код:
  var
    
sastring;
    
irezinteger;
    
okboolean;
begin
  readln
(s);
  
ok:=false;
  
rez:=0s:=s+' ';
  
a:='';
  for 
i:=1 to length(s) do
    
begin
      
if s[i]<>' ' then
        begin
          a
:=s[i];
          if 
s[i] = 'k' then ok:=true;
        
end
      
else
        
begin
          
if ok then
            begin
              writeln
(a);
              
ok:=false;
            
end;
          
a:='';
        
end;
    
end;
  
readln;
end
 
Ответить с цитированием

  #2605  
Старый 01.04.2010, 21:13
Аватар для rid3r~man
rid3r~man
Участник форума
Регистрация: 10.01.2009
Сообщений: 296
Провел на форуме:
4457946

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

Помогите плз разобраться.

Требуется составить програму на Паскале, которая выводит на экран все натуральные трехзначные числа,
делящиеся без остатка на 17, сумма цифр которых равняется 11.

Получилось вот что:
PHP код:
   var 
     
x,y,z,a,i,s:integer;
 
Begin
   
For i:=100 to 999 do
      
x:=i div 100;
      
y:=(i div 10mod 10;
      
z:=i mod 10;
     
Begin
       a
:=x+y+z;
       If (
a=11) and (i mod 17 0then s:=s+i;
       
writeln ('s',s);
       
readln;
     
end;
 
end
Выводит: s=0
Что не так, подскажите пожалст?

Так же еще пробывал
PHP код:
     Begin
   i
:=100
     
{тут манипуляции с числамидальше сам цикл}
     If (
a=11) and (i mod 17 0then s:=s+else i:=i+1;
     
writeln ('s',s);
     
readln;
 
end
И cнова s=0.
Только тут программа не выйдет из цикла при i=999, как это сделать??
 
Ответить с цитированием

  #2606  
Старый 01.04.2010, 21:29
Аватар для Soherox
Soherox
Познающий
Регистрация: 17.02.2010
Сообщений: 45
Провел на форуме:
195184

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

rid3r~man..держи
PHP код:
 var
     
xyzais:integer;
 
Begin
   
For i:=100 to 999 do
     
begin
        x
:=i div 100;
        
y:=(i div 10mod 10;
        
z:=i mod 10;
        
a:=x+y+z;
        If (
11) and (i mod 17 0then writeln (i);
     
end;
   
readln;
 
end

Последний раз редактировалось Soherox; 01.04.2010 в 21:31..
 
Ответить с цитированием

  #2607  
Старый 01.04.2010, 22:24
Аватар для new-sl
new-sl
Познающий
Регистрация: 27.05.2009
Сообщений: 44
Провел на форуме:
105684

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

Цитата:
Сообщение от n1ghtstalker  
молодой человек для начала вам бы прочитать это:
_http://www.google.ru/search?hl=ru&source=hp&q=%D1%81%D0%BA%D0%B0%D1%87% D0%B0%D1%82%D1%8C+%D0%BE%D1%80%D1%84%D0%BE%D0%B3%D 1%80%D0%B0%D1%84%D0%B8%D1%87%D0%B5%D1%81%D0%BA%D0% B8%D0%B9+%D1%81%D0%BB%D0%BE%D0%B2%D0%B0%D1%80%D1%8 C+%D1%80%D1%83%D1%81%D1%81%D0%BA%D0%BE%D0%B3%D0%BE +%D1%8F%D0%B7%D1%8B%D0%BA%D0%B0&lr=&aq=0&aqi=g8&aq l=&oq=%D1%81%D0%BA%D0%B0%D1%87%D0%B0%D1%82%D1%8C+% D0%BE%D1%80%D1%84%D0%BE%D0%B3%D1%80%D0%B0%D1%84&gs _rfai=
чето ты какуето..(похоже на неудачную попитку ломонут гоогле ) запостил нечо ненаходит пошли ключивое слово по каторому искал

Последний раз редактировалось new-sl; 01.04.2010 в 22:28..
 
Ответить с цитированием

  #2608  
Старый 02.04.2010, 08:14
Аватар для rid3r~man
rid3r~man
Участник форума
Регистрация: 10.01.2009
Сообщений: 296
Провел на форуме:
4457946

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

Soherox Спасибо.
А как все таки здесь сделать, чтобы программа вышла из цикла после i=999 ??
PHP код:
 Begin 
   i
:=100 
     
{тут манипуляции с числамидальше сам цикл
     If (
a=11) and (i mod 17 0then s:=s+else i:=i+1
     
writeln ('s',s); 
     
readln
 
end
 
Ответить с цитированием

  #2609  
Старый 02.04.2010, 08:53
Аватар для Soherox
Soherox
Познающий
Регистрация: 17.02.2010
Сообщений: 45
Провел на форуме:
195184

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

Цитата:
А как все таки здесь сделать, чтобы программа вышла из цикла после i=999 ??

PHP код:
Begin 
   i
:=100 
     
{тут манипуляции с числами
     If (
a=11) and (i mod 17 0then s:=s+else i:=i+1
     
writeln ('s',s); 
     
readln
 
end
Я как понял тут ты используешь цикл While? Тогда так:
PHP код:
begin
   i
:=100;
   while 
i<>999 do
     
begin
        
{тут манипуляции с числамидальше сам цикл
        If (
11) and (i mod 17 0then s:=s+i;
        
i:=i+1;
     
end;
   
writeln(s);
   
readln;
 
end
 
Ответить с цитированием

  #2610  
Старый 02.04.2010, 11:58
Аватар для new-sl
new-sl
Познающий
Регистрация: 27.05.2009
Сообщений: 44
Провел на форуме:
105684

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

почему когда в алгоритми алфа-бета ; алфа==бета то происходит отсичение со сторони бета я никак непоиму почему чем становится посизия бета хуже расталкуите плиз!!!
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Сюда выкладываем все проги для фрикринга мобильников, которых знаем! nigger Сотовый фрикинг 5 11.04.2009 11:15
Американским студентам запретили пользоваться Skype KPOT_f!nd Мировые новости 1 28.09.2006 03:47
Любителям квестов сюда!! FoX's Болталка 10 25.01.2005 20:42



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


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




ANTICHAT.XYZ