![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Пользователь
Регистрация: 19.03.2012
Сообщений: 21
|
![]()
Школьный уровень.Я написала такую программу:
Код:
![]() ![]() Последний раз редактировалось Stilet; 19.03.2012 в 21:10. |
![]() |
![]() |
![]() |
#2 |
Delphi Warrior
Старожил
Регистрация: 15.08.2008
Сообщений: 2,502
|
![]()
Предлагаю другой подход!
Допустим вы считываете число в строку Код:
Тогда для перевода числа используем степени двойки через експоненту Код:
Mess with the best, die like the rest.
![]() Лабораторные, курсовые на Delphi\Pascal\C++ ya.flex-freelance@yandex.ru Icq - 636-954-303 |
![]() |
![]() |
![]() |
#3 |
Пользователь
Регистрация: 19.03.2012
Сообщений: 21
|
![]()
К сожалению, я не могу в этом разобраться
![]() Мы не проходили такие операторы.Но всё равно спасибо))) |
![]() |
![]() |
![]() |
#4 | |
Delphi Warrior
Старожил
Регистрация: 15.08.2008
Сообщений: 2,502
|
![]() Цитата:
Mess with the best, die like the rest.
![]() Лабораторные, курсовые на Delphi\Pascal\C++ ya.flex-freelance@yandex.ru Icq - 636-954-303 |
|
![]() |
![]() |
![]() |
#5 |
Пользователь
Регистрация: 19.03.2012
Сообщений: 21
|
![]()
Если я сделаю с операторами,которые мы не проходили,у меня опять не примут работу
![]() |
![]() |
![]() |
![]() |
#6 | |
Delphi Warrior
Старожил
Регистрация: 15.08.2008
Сообщений: 2,502
|
![]() Цитата:
У вас не примут работу если вы сами в ней не разбираетесь, в противном случае можно подать жалобу на преподавателя, его заменят! Операторы не сложные! А бы сказал что раз так в 100500 проще ваших! Что конкретно вам не ясно в коде?
Mess with the best, die like the rest.
![]() Лабораторные, курсовые на Delphi\Pascal\C++ ya.flex-freelance@yandex.ru Icq - 636-954-303 |
|
![]() |
![]() |
![]() |
#7 |
Delphi Warrior
Старожил
Регистрация: 15.08.2008
Сообщений: 2,502
|
![]()
Ладно если вас не устраивает мой вариант, то вот ваш переделанный
Код:
Поэтому лучше всё таки взять мой вариант!
Mess with the best, die like the rest.
![]() Лабораторные, курсовые на Delphi\Pascal\C++ ya.flex-freelance@yandex.ru Icq - 636-954-303 Последний раз редактировалось Hacker19_90; 19.03.2012 в 18:15. |
![]() |
![]() |
![]() |
#8 |
Пользователь
Регистрация: 19.03.2012
Сообщений: 21
|
![]()
Я не знаю что такое W_String,Dec_Number и length
|
![]() |
![]() |
![]() |
#9 | |
Delphi Warrior
Старожил
Регистрация: 15.08.2008
Сообщений: 2,502
|
![]() Цитата:
W_String: string; всё просто Dec_Number число Dec_Number: integer length функция которая возвращает длину строки!
Mess with the best, die like the rest.
![]() Лабораторные, курсовые на Delphi\Pascal\C++ ya.flex-freelance@yandex.ru Icq - 636-954-303 |
|
![]() |
![]() |
![]() |
#10 |
Пользователь
Регистрация: 19.03.2012
Сообщений: 21
|
![]()
ec_Number := 0;
for i := 0 to length(W_String) - 1 do begin if W_String[i+1] = '1' then Dec_Number := Dec_Number +exp(ln(2)*(Length(W_String) - i)); end; Writeln (Dec_Number); Это куда в моей программе вставлять? |
![]() |
![]() |
![]() |
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Перевод из двоичной системы в двоично-десятичную (assembler) | Dolgan | Фриланс | 2 | 27.01.2011 18:01 |
Pascal ABC. Перевод из двоичной в десятичную систему счисления. | ARTEM_KA | Помощь студентам | 4 | 17.11.2010 22:15 |
Блок-схема в Паскале | Игорь Н. | Фриланс | 6 | 27.10.2010 19:30 |
си++ перевод числа из двоичной системы в десятичную. | Bonne | Помощь студентам | 1 | 13.04.2010 22:07 |
Перевод числа из двоичной системы в десятичную С++ | kontroller | Помощь студентам | 2 | 15.02.2010 20:39 |