|  25.01.2013 / 09:20 |  | 
| myname    Пользователь 
  Сейчас: Offline 
 Имя: АскалайтРегистрация: 12.10.2011
 
 | вернул обратно. Как русифицировать, а то вводятся кракозябы?
 | 
|  25.01.2013 / 10:43 |  | 
| St@SyaN    Пользователь 
  Сейчас: Offline 
 Откуда: УфаРегистрация: 03.07.2012
 
 | Реально ли скомпилить консольное приложение так, чтобы оно работало на Widows, без Dosа?
 | 
|  25.01.2013 / 12:11 |  | 
| ВитаминКО    Супермодератор 
  Сейчас: Offline 
 Имя: ВасилиусОткуда: RZN
 Регистрация: 20.04.2012
 
 | myname, искать русификатор и подключать его__________________
 этот пойдет? (от досбокса)
 
 
   わからない!!
 Прикрепленные файлы:  KEYRUS.com  (22.18 кб.) Скачано 593 раза  | 
|  26.01.2013 / 00:52 |  | 
| Pauk52    Пользователь 
  Сейчас: Offline 
 Имя: ВолодимирОткуда: Пески-радьковские
 Регистрация: 25.01.2011
 
 | Пост #234810набросал код но он ужасен и не работает полностю.  program Smile; var  i, a, b: integer;  str: string; begin  a := 0;  b := 0;  read(str);  for i := 1 to length(str) do   begin    if (str[i] = ':') or (str[i] = ';') then a := a + 1;     if a>0 then         if (str[i] = ')')        or (str[i] = '(')        or (str[i] = ']')         or (str[i] = '[')        then     begin        b := b + 1;        a:=0;        break;      end;      if (str[i] = '-') then a := a + 1;    if a > 1 then       if (str[i] = ')')        or (str[i] = '(')        or (str[i] = ']')         or (str[i] = '[')        then         b := b + 1;  end;  writeln(str);  writeln(b); end.
 Изменено aNNiMON (26.01 / 01:23) (всего 1 раз)
 | 
|  26.03.2013 / 11:43 |  | 
| ВитаминКО    Супермодератор 
  Сейчас: Offline 
 Имя: ВасилиусОткуда: RZN
 Регистрация: 20.04.2012
 
 | Дайте пожалуйста ссылку на стабильную версию Free Pascal под win 7__________________
 
   わからない!! | 
|  26.03.2013 / 20:37 |  | 
| XakepPRO    Модератор форума 
  Сейчас: Offline 
 Регистрация: 20.06.2012
 | ВитаминКО, с удовольствием тебе отвечу,  http://www.freepascal.org/download.var  – выбирай. | 
|  26.03.2013 / 23:19 |  | 
| ВитаминКО    Супермодератор 
  Сейчас: Offline 
 Имя: ВасилиусОткуда: RZN
 Регистрация: 20.04.2012
 
 | XakepPRO, оттуда качал несколько версий...__________________
 
   わからない!! | 
|  26.03.2013 / 23:30 |  | 
| XakepPRO    Модератор форума 
  Сейчас: Offline 
 Регистрация: 20.06.2012
 | ВитаминКО,  тебе нужна была, насколько понимаю, 32х битная версия: Intel/i386 – Win32, Win64 and WinCE; или 64х битная: AMD64/x86_64 – Windows 64-bit.
 | 
|  26.03.2013 / 23:37 |  | 
| ВитаминКО    Супермодератор 
  Сейчас: Offline 
 Имя: ВасилиусОткуда: RZN
 Регистрация: 20.04.2012
 
 | XakepPRO, в общем, такое выдает. Неделю нормально работало, стал вторую лабу делать - на Writeln зависает. Закрываю, открываю, компилю исходник, запускаю - первый раз норм, после второго такое окошечко (прикреп.). Потом что-то вроде "Файл был изменен другой программой" Оо (втф?)__________________
 
   わからない!!
 Прикрепленные файлы:  Ошибка.png  (2.55 кб.) Скачано 96 раз  | 
|  26.03.2013 / 23:39 |  | 
| ВитаминКО    Супермодератор 
  Сейчас: Offline 
 Имя: ВасилиусОткуда: RZN
 Регистрация: 20.04.2012
 
 | Пока что работаю в Virtual PC XP Mode, но каждый раз неудобно запускать__________________
 
   わからない!! |