Компьютерный форум
Правила
Вернуться   Компьютерный форум > Форум программистов > Офтопик > Работа > Задания за деньги
Перезагрузить страницу Помогите пожалуйста с задачей на SWI Prolog?!
Ответ
 
Опции темы Опции просмотра
  (#1 (permalink)) Старый
juk juk вне форума
Новичок
 
Сообщений: 1
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 01.06.2013
По умолчанию Помогите пожалуйста с задачей на SWI Prolog?! - 01.06.2013, 21:02

Вот суть задачки - 1087. Время забирать камни

Есть готовый рабочий код на Pascal:
program game_stones;
var
a:array[0..10000] of byte;
st : array[1..50] of integer;
n,k,i,j : integer;

Begin
readln(n,k);
for i:=1 to k do read(st[i]);
a[0]:=1;
for i:=1 to n do a[i]:=0;
for i:=1 to n do
Begin
for j:=1 to k do
if i>=st[j]
then if a[i-st[j]]=2
then
Begin
a[i]:=1;
break;
End;
if a[i]=0 then a[i]:=2;
End;
writeln(a[n]);
End.


Может кто сможет помочь написать ее на SWI Prolog?

Последний раз редактировалось Dark King; 02.06.2013 в 07:11
Ответить с цитированием
  (#2 (permalink)) Старый
mikefreel mikefreel вне форума
Member
 
Сообщений: 438
Сказал(а) спасибо: 0
Поблагодарили 1 раз в 1 сообщении
Регистрация: 10.12.2010
По умолчанию 01.06.2013, 22:28

Готов взяться за проект
номер ICQ: 565460353 или 480964456
mikefreelance@rambler.ru
Ответить с цитированием
Ads
Ответ

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Выкл.


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите пожалуйста с задачей. Нужно написать программу работающую в Prolog. Iza10 Задания за деньги 3 29.05.2013 19:41
Помогите пожалуйста с задачей!! Елена12 Pascal 0 22.04.2012 15:05
помогите пожалуйста с задачей! Маринка123 Pascal 0 27.11.2011 00:48
Помогите пожалуйста с задачей)) julia3818 Prolog 6 24.11.2011 21:20
Помогите с задачей на SWI-Prolog Anksuna Prolog 11 18.09.2011 19:32
Помогите пожалуйста с задачей...:) Mirakel Prolog 9 31.05.2011 18:38
Пожалуйста помогите с задачей Skillet Prolog 10 12.05.2011 19:33
Пожалуйста помогите с задачей Galick Prolog 4 10.05.2011 17:15
Помогите пожалуйста с задачей на Prolog! csram Prolog 5 29.04.2010 22:43
Помогите с задачей, пожалуйста sldj Prolog 4 27.04.2010 19:48
Помогите пожалуйста с задачей Dimon278 Pascal 3 16.11.2009 12:10
Помогите, пожалуйста с задачей на SWI okonomiyaki Prolog 0 22.01.2008 19:32



Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Нardforum.ru - компьютерный форум и программирование, форум программистов