10.06.2014, 00:57 | #1 (permalink) |
Новичок
Регистрация: 05.06.2014
Сообщений: 10
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Решить задачу, Паскаль
|
10.06.2014, 00:57 | |
Helpmaster
Member
Регистрация: 08.03.2016
Сообщений: 0
|
Наверняка тут вы найдете что то полезное, по этому дам вам ссылки на похожи темы Помогите решить задачу, Паскаль Помогите решить задачу c массивами. Паскаль Помогите решить задачу. Паскаль Помогите пожалуйста решить задачу Паскаль Помогите пожалуйста решить задачу Паскаль Уважаемые программисты, помогите решить задачу на строки символов. Паскаль |
10.06.2014, 04:54 | #2 (permalink) |
Member
Регистрация: 07.08.2012
Адрес: Находка, Приморский край
Сообщений: 336
Сказал(а) спасибо: 14
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 1671
|
Хоспади, да вот первая же ссылка по запросу в гугле:
Hex -> Dec: Решение 1 var i : integer; s : string; begin s := '$' + ThatHexString; i := StrToInt(a); end; Решение 2 CONST HEX : ARRAY['A'..'F'] OF INTEGER = (10,11,12,13,14,15); VAR str : String; Int,i : integer; BEGIN READLN(str); Int := 0; FOR i := 1 TO Length(str) DO IF str[i] < 'A' THEN Int := Int * 16 + ORD(str[i]) - 48 ELSE Int := Int * 16 + HEX[str[i]]; WRITELN(Int); READLN; END. Решение 3 Самое простое преобразование - через строку. HexString := Format('%0x',DecValue); |
09.11.2014, 10:45 | #4 (permalink) |
Специалист
Регистрация: 27.08.2008
Адрес: Санкт-Петербург
Сообщений: 27,807
Сказал(а) спасибо: 340
Поблагодарили 583 раз(а) в 208 сообщениях
Репутация: 113184
|
Tana, Вас похитили и убили злодеи, не дав дописать сообщение? Сейчас это напоминает послание капитана Гранта, частично испорченное просочившейся в бутылку морской водой.
|
09.11.2014, 10:58 | #5 (permalink) | |
Новичок
Регистрация: 09.11.2014
Сообщений: 2
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Цитата:
Дана последовательность: 5 9 13 17 ...324. Найти кол-во чисел в числовом ряду. (Паскаль через FOR) |
|
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
09.11.2014, 11:06 | #6 (permalink) | |
Специалист
Регистрация: 27.08.2008
Адрес: Санкт-Петербург
Сообщений: 27,807
Сказал(а) спасибо: 340
Поблагодарили 583 раз(а) в 208 сообщениях
Репутация: 113184
|
Цитата:
a[i] = 5 + 4*i, i = 1, 2, 3 ... а 324 сюда ну никак не вписывается. Может быть, 325? Тогда ответ 81. |
|
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
|
|