Вниз  Pascal
- 25.01.2013 / 09:20
myname
  Пользователь

myname 
Сейчас: Offline
вернул обратно. Как русифицировать, а то вводятся кракозябы?
- 25.01.2013 / 10:43
St@SyaN
  Пользователь

St@SyaN 
Сейчас: Offline
Реально ли скомпилить консольное приложение так, чтобы оно работало на Widows, без Dosа?
- 25.01.2013 / 12:11
ВитаминКО
  Супермодератор

ВитаминКО 
Сейчас: Offline
myname, искать русификатор и подключать его

этот пойдет? (от досбокса)
__________________
 わからない!!


Прикрепленные файлы:
KEYRUS.com (22.18 кб.) Скачано 563 раза
- 26.01.2013 / 00:52
Pauk52
  Пользователь

Pauk52 
Сейчас: Offline
Пост #234810
набросал код но он ужасен и не работает полностю.
  1. program Smile;
  2.  
  3. var
  4.   i, a, b: integer;
  5.   str: string;
  6.  
  7. begin
  8.   a := 0;
  9.   b := 0;
  10.   read(str);
  11.   for i := 1 to length(str) do
  12.   begin
  13.     if (str[i] = ':') or (str[i] = ';') then a := a + 1;
  14.     if a>0 then
  15.         if (str[i] = ')')
  16.         or (str[i] = '(')
  17.         or (str[i] = ']')
  18.         or (str[i] = '[')
  19.         then
  20.     begin
  21.         b := b + 1;
  22.         a:=0;
  23.         break;
  24.       end;
  25.       if (str[i] = '-') then a := a + 1;
  26.     if a > 1 then
  27.       if (str[i] = ')')
  28.         or (str[i] = '(')
  29.         or (str[i] = ']')
  30.         or (str[i] = '[')
  31.         then
  32.         b := b + 1;
  33.   end;
  34.   writeln(str);
  35.   writeln(b);
  36.  
  37. end.


Изменено aNNiMON (26.01 / 01:23) (всего 1 раз)
- 26.03.2013 / 11:43
ВитаминКО
  Супермодератор

ВитаминКО 
Сейчас: Offline
Дайте пожалуйста ссылку на стабильную версию Free Pascal под win 7
__________________
 わからない!!
- 26.03.2013 / 20:37
XakepPRO
  Модератор форума

XakepPRO 
Сейчас: Offline
ВитаминКО, с удовольствием тебе отвечу, http://www.freepascal.org/download.var – выбирай.
- 26.03.2013 / 23:19
ВитаминКО
  Супермодератор

ВитаминКО 
Сейчас: Offline
XakepPRO, оттуда качал несколько версий...
__________________
 わからない!!
- 26.03.2013 / 23:30
XakepPRO
  Модератор форума

XakepPRO 
Сейчас: Offline
ВитаминКО, тебе нужна была, насколько понимаю, 32х битная версия: Intel/i386 – Win32, Win64 and WinCE; или 64х битная: AMD64/x86_64 – Windows 64-bit.
- 26.03.2013 / 23:37
ВитаминКО
  Супермодератор

ВитаминКО 
Сейчас: Offline
XakepPRO, в общем, такое выдает. Неделю нормально работало, стал вторую лабу делать - на Writeln зависает. Закрываю, открываю, компилю исходник, запускаю - первый раз норм, после второго такое окошечко (прикреп.). Потом что-то вроде "Файл был изменен другой программой" Оо (втф?)
__________________
 わからない!!


Прикрепленные файлы:
Ошибка.png (2.55 кб.) Скачано 94 раза
- 26.03.2013 / 23:39
ВитаминКО
  Супермодератор

ВитаминКО 
Сейчас: Offline
Пока что работаю в Virtual PC XP Mode, но каждый раз неудобно запускать
__________________
 わからない!!
Наверх  Всего сообщений: 540
Фильтровать сообщения
Поиск по теме
Файлы топика (22)