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 кб.) Скачано 564 раза |
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 кб.) Скачано 94 раза |
26.03.2013 / 23:39 | |
ВитаминКО Супермодератор Сейчас: Offline
Имя: Василиус Откуда: RZN Регистрация: 20.04.2012
| Пока что работаю в Virtual PC XP Mode, но каждый раз неудобно запускать
__________________
わからない!! |