IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> календарь, ...
Alpha7
сообщение 18.06.2005 17:13
Сообщение #1


Новичок
*

Группа: Пользователи
Сообщений: 14
Пол: Мужской

Репутация: -  0  +


День добрый, господа !
Подскажите плз как из stringовой переменной перевести в integer.
Записи вида 1.номер 2.начальная работа (01.01.2004) string3.промежуточная работа (10 дней)integer считываются из файла, необходимо найти время следующей работы путем сложения п.1 и п.2.
Заранее сенх !
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
klem4
сообщение 18.06.2005 17:20
Сообщение #2


Perl. Just code it!
******

Группа: Модераторы
Сообщений: 4 100
Пол: Мужской
Реальное имя: Андрей

Репутация: -  44  +


Пример перевода из String в Integer :

uses crt;
var
s:string;
x,ErrCode,result:integer;

Begin
clrscr;
write('s='); readln(s);
val(s,x,ErrCode);
if ErrCode=0 then begin
Result:=x;
writeln('Result=',Result);
end
else writeln('ErrCode=',ErrCode);
end.



зы если введешь скажем 23g42 то вернет ErrCode = 3 (символ в котором ошибка)

зыы если сам не разберешься, задание попонятней напиши а то я ваще ничо не понял, кроме того что что-то надо в integer перводить... blink.gif

Сообщение отредактировано: klem4 - 18.06.2005 17:26


--------------------
perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 22.06.2025 7:48
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"