Статистика |
Онлайн всего: 1 Гостей: 1 Пользователей: 0 |
|
1293.
MegaBaitik
(12.02.2007 17:47)
0
Здравствуйте. Мне очень нравиться Ваш сайт borlpasc.narod.ru и я являюсь постоянным его посетителем. Подскажите пожалуйста, какой движок для этого используется и продаете ли Вы его? Заранее спасибо!
|
1292.
Nick
(12.02.2007 00:54)
0
Помогите пожалуйста решить пару задачек на pascal. Задания выслал вам на borlpasc@narod.ru + высылаю вам пару задач которые я смог сделать сам. Заранее большое спасибо!
|
1291.
Dodastar_93
(10.02.2007 19:14)
0
Отличный сайт! Создателю респект!
|
1290.
Калиостра
(08.02.2007 15:05)
0
У меня вопрос как в ТР увеличить размер стеки?
Ответ: Под TP что понимаете? Turbo.exe? Тогда без всякого сомнения, лучше использовать BP.EXE. У них одинаково Options -> Memory -> Stack Size -- ЗЫ: Если проблема встретилась в рекурентной процедуре (функции), то лучше уменьшить число передаваемых параметров. Как правило, простое увеличение стека мало помогает
|
1289.
Maxim
(28.01.2007 23:25)
0
Огромное спасибо завтра пойду здавать напишу результат ешё раз спасибо!
|
1288.
инкогнито
(28.01.2007 20:57)
0
а, блин, забыл прокомментировать: если, допустим, n=3, то массив вводить так: x x x x x x x x x , где x - числа. если память мне не изменяет, то побочная диагональ - это та, что идёт из нижнего левого в верхний правый угол. после недолгих раздумий я решил, что элемент побочной диагонали можно узнать так: [число n]-([номер строки]-1) наверняка есть ещё миллион способов это узнать, но я взял первый пришедший в голову 8)
|
1287.
инкогнито
(28.01.2007 20:48)
0
вуаля:
const max = 10; var a: array[1..max,1..max] of integer; n,i,i2,sum: integer; begin write(''введите n:''); readln(n); for i:=1 to n do for i2:=1 to n do read(a[i,i2]); readln; sum := 0; for i:=1 to n do for i2:=1 to n do if i2<>(n-(i-1)) then sum := sum + a[i,i2] else begin end; write(''сумма = '',sum); readln; end.
|
1286.
Maxim
(28.01.2007 16:45)
0
Ребята помогите завтра здаю экзамен а лабу одну не сдал! Пусть дан двумерный массив A[1..n,1..n] n<либо равно 10 целых чисел! Напишите программу которая вычислит сумму значений эллементов не находящихся на побочной диагонале!
Ввод: число n эллементы и эллементы массива A вводяться с клавиатуры! Ввыод:на экран ввыодиться сумма значений эллементов не находящихся на побочной диагонале!
Помогите плзз написать эту прогу! Зарание пасибо! Прогу если можна пришилте на мыло max_mouse@rambler.ru
|
1285.
инкогнито
(23.01.2007 10:21)
0
сайт жесть. правда почему-то гостевая книга в форум привратилась, ну да ладно. всё равно жесть... 8)
Ответ: ;)
|
1284.
Kostya
(22.01.2007 12:31)
0
Здравствуйте! Мне заинтересовался этот компилятор «masm32». Но есть вопросы: 1. Где это можно достать? 2. Этот компилятор работает в виде консоли и скомпилированный файл тоже в консоли работает? Вот моя идея: Взять скомпилировать программу №1 - «ожидание по времени (Sleep)» в компиляторе «masm32», и скомпилировать свою запрограммированную программу №2 в компиляторе «TPW» (лично я привык к этой старой программе). И тот №2 запускает программу №1 (при помощи функции «WinExec»), но одно не получается – это то, что после запуска программы №1 в функции «WinExec», программа №2 продолжает дальше работать под 2 процессом, то есть, не ожидается после выполнение программ №1. Есть и другой файл «ожидание по времени» так называемая «Ask» (работает и под Dos, и под Windows), не занимает процесс в компьютере (0%), но эта программа не закрывается после нажатие кнопки выключения компьютера, так как обрабатывает свою работу. Есть ли другие идеи?
Ответ: masm32: http://www.masm32.com/masmdl.htm Много людей хвалит FASM: http://flatassembler.net/ Насчет идеи: и я о том же. Ask не знаю
|
1283.
Kostya
(19.01.2007 10:43)
0
Наверно мой компилятор называется "TPW", а не "BPW". И там нету этого "Sleep(XXXXX)", и модуль "WINDOWS". Есть ли другие варианты? К стати, в паскале под виндовса функция "Write" и "ClrScr" работает. Выручи пож.
Ответ: Скачал я его, поставил и давай ругаться... Это очень старая штука. И разбирать в нем не хочется. Уж лучше BPW.exe из пакета Borland Pascal 6 или 7 версии используй. Хотя лучше уж Free Pascal. Он большой, но современный (разрабатывается и в настоящее время, свободно распространяемый продукт). Или, если можно, то Delphi ------ И если уж совсем припекает, то организуй цикл большой (одно плохо: трудно будет время выполнения отслеживать). Например: for i:=1 to 30000 do b:=exp(-1); {что-нибудь долго выполняющееся - логарифм, синусы там разные ...}
|
1282.
Kostya
(19.01.2007 05:21)
0
Всё ясно проблема с кавычками на страничке со словом "Write".
Ответ: Нет. Скорее всего дело в том, что все эти Write и ClrScr НЕ БУДУТ работать в GUI-приложении, а только в консольном. У вас как?
|
1281.
Kostya
(19.01.2007 05:15)
0
Ой... Я не верно записал "Write("Ok timed!")", а надо "Write(''Ok timed!'')". И ещё вспомнил: когда я написал прогу (более 400 строк), то программа (после компиляции без ошибочно) начинает не правильно работать. То есть на примере:
Reset(FileR); {Открывается файл и он присуствует без ошибочно, но}
If IOResult <> 0 then Exit
{Всёравно вылетает, то есть думает что "IOResult" не равняется "0"}
Но вовсем проблема не в файле, а в цикле - так-как в "If 0 = 0 then Write(''Ok'')" - "Ok" не выводилось.
Спасибо, что заглянули.
|
1280.
Kostya
(19.01.2007 03:27)
0
Привет! У меня тут проблемка: Установлен компилятор "PASCAL for WINDOWS" (Borland) и я не знаю, какую функцию или оператор надо ввести, чтобы оно у меня выполнялось как оператор "Delay(30000)". То есть после запуска программ, текст "Ok timed!" показался через 30 секунд, например:
Program WaitTime; Uses WinCrt; Begin <Ввести имя функции или операции> Write(''Ok timed!'') End.
Заранее благодарю.
|
1279.
СаШки
(16.01.2007 00:46)
0
Приветики! Ценный ресурс, без вариантов! Однако есть ли такие учебники, чтобы были сразу запакованы одним рахивом? Плиз, вышлите мне аткой на мыло, если не затруднит!! Очень нужны (начлаьное программирование), а качать по 1 страничке - одлго очень (( Заранее благодарен!!
Ответ: Письмом выслал свои предложения
|
|
|
|