Показать сообщение отдельно
  #3  
Старый 26.11.2011, 16:44
Аватар для Bargest
Bargest Bargest вне форума
Профессионал
 
Регистрация: 19.10.2010
Адрес: Москва
Сообщения: 2,390
Версия Delphi: XE3/VS12/FASM
Репутация: 14665
По умолчанию

Вводишь две строки из нулей, единиц и одной точки (аля 100110101.10001) с клавиатуры, выравниваешь строки так, чтоб точка была в одной и той же позиции и складываешь посимвольно правилом столбика. Вот и весь алгоритм. Из функций понадобится ReadLn и WriteLn.
Если же хочешь, чтоб за тебя написали саму программу => в раздел "работа".
__________________
jmp $ ; Happy End!
The Cake Is A Lie.
Ответить с цитированием