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

Перепечатать код с Python'a на Delphi или C++
  #1  
Старый 28.04.2010, 23:24
Livion
Новичок
Регистрация: 26.04.2010
Сообщений: 1
Провел на форуме:
3744

Репутация: 0
По умолчанию Перепечатать код с Python'a на Delphi или C++

Пожалуйста кто умеет перепечатайте код с python на делфи. Заранее спасибо.

Код:
#!/usr/bin/env python
# coding: utf-8
import sys

# чтение входа
N, M, S1, S2 = map(int, sys.stdin.readline().split())
adj = [[] for each in range(N + 1)]  # списки смежности

for each in range(M):
    a, b = map(int, sys.stdin.readline().split())
    adj[a].append(b)
    adj[b].append(a)

olor=dict() # color[x] будет равен цвету вершины

# процедура раскраски графа в два цвета, 0 и 1
def dfs(x, xcolor):
    color[x] = xcolor
    for y in adj[x]:
        if y not in color:  # если y не посетили
            dfs(y, 1 - xcolor)  # посещаем и назначаем противоположный цвет
        elif color[y] !=1- xcolor:  # проверяем на совместимость
            raise 'NO'

try:
  
    dfs(x=1, xcolor=0)

    
    num = [0, 0]
    for x in color.keys():
        num[color[x]] += 1

    
    if (num[0] <= S1 and num[1] <= S2) or (num[0] <= S2 and num[1] <= S1):
        print 'YES'
        if (num[0]<=S1 and num[1]<=S2):
            for x in range(1,N+1) :
                  print color[x]+1,' ',
        else:
            for x in range(1,N+1):
                  print 2-color[x],' ',
        
    else:
        print 'NO'
   
except:
   print 'NO'
 
Ответить с цитированием
 



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Копирование сложноформируемого HTTP-запроса или как накрутить голосование lukmus Авторские статьи 2 19.04.2010 17:35
Статейки УК Украины.Выборка по ИТ и не только. liquidcube Статьи 23 10.12.2009 06:23
Стандартные пароли, пароли по умолчанию, мастер-пароли Elvis000 Электроника и Фрикинг 11 22.10.2009 03:31
Хакеры и кракеры или "Что такое хорошо и что такое плохо?" foreva Чужие Статьи 12 09.02.2008 12:26



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


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




ANTICHAT.XYZ