Найдено 62 результата

informat
07.12.2011 08:45:32
Форум: Помощь за вознаграждение
Тема: формула паскаль
Ответы: 15
Просмотры: 32240

Re: формула паскаль

1/a+2/(a+(a+1))+3/(a+(a+1)+(a+2))+...+n/(a+(a+1)+(a+2)+...+(a+n)),преобразуйте её в паскалевкий вид,пожалуйста)):*

Наверное задача звучала так:
Написать программу вычисляющую эту формулу на языке паскаль для заданных a и n.
Наверное n - натуральное, а a - действительное.
Нужно ли при вычислении ...
informat
28.11.2011 06:23:43
Форум: Обучение Free Pascal
Тема: Объясните новичку.
Ответы: 106
Просмотры: 100864

Re: Объясните новичку.

Подскажите пожалуйста что за ошибка
<1.1> Error: Illegal Expression
Graph прописан выше в самой програме;

Procedure doroga;
var i:integer;
begin
setcolor(6);
line(0,850,1440,850);
i:=0;
While i<=1440 do
begin
setcolor(2);
line(10+i,850,i,900);
i:=i+1;
end;
end.

Да. Нужен весь текст ...
informat
21.11.2011 06:12:04
Форум: Lazarus
Тема: Чудеса ф-ции round()
Ответы: 6
Просмотры: 4056

Re: Чудеса ф-ции round()

Vadim писал(а):
Владимир писал(а):Какие мнения?

Однозначно - использовать целочисленное деление (div), а не заставлять процессор маяться дурью со всякими там Round'ами. ;)


round и div дают разные результаты.
round (2/3)= 1
2 div 3 = 0

Хотя в данном случае это может быть и несущественно.
informat
15.11.2011 06:41:06
Форум: Обучение Free Pascal
Тема: Массивы. Найти максимум среди чисел. [РЕШЕНО]
Ответы: 15
Просмотры: 26152

Re: Массивы. Подскажите где ошибка.


Если использовать это выражение, ответ будет все равно 0, при таком раскладе:
massiv n=5
-88 -8 -18 0 2
max= 0

В данном случае 0 - правильный результат, если в УСЛОВИИ подразумевается алгебраический максимум, а не по модулю.
Разумеется, что начальным значением надо взять max:= 0-MaxInt
где ...
informat
14.11.2011 06:31:38
Форум: Free Pascal Compiler
Тема: [Решено] Странный результат
Ответы: 8
Просмотры: 5486

Re: Странный результат

a,b,c&#58;real;
&#46;&#46;&#46;
a&#58;=0&#46;05;
b&#58;=0&#46;9;
c&#58;=a+b;
writeln(c=0&#46;95)
Оператор writeln выдаёт false. Почему?
Ну после c:=a+b с становится равным 0.95 и writeln должен выдать true. Или я чегото не понимаю?

Действительные числа - ПРИБЛИЗИТЕЛЬНЫЕ. И сравнивать их на ...
informat
14.11.2011 06:11:43
Форум: Обучение Free Pascal
Тема: Массивы. Найти максимум среди чисел. [РЕШЕНО]
Ответы: 15
Просмотры: 26152

Re: Массивы. Подскажите где ошибка.

Спасибо, очень помогли, особая благодирность Oleg_D!
Вот чувствовал ведь - истина, где-то рядом!

В таком виде работает как надо:


{найти максимум среди чисел, в десятичной системе счисления оканчивающихся на 8}
uses crt;
var
i,n,max&#58;integer;
a&#58;array&#91;1&#46;&#46;30&#93;of integer ...
informat
13.11.2011 07:04:51
Форум: Потрепаться
Тема: Помогите отыскать ошибку в игре (((
Ответы: 20
Просмотры: 24982

Re: Помогите отыскать ошибку в игре (((

Написал не большую игру "змейку" при запуске "змейка" не совершает движения.. а при выходе из программы выдается ошибка exitcode=201 , Прошу помочь отыскать ошибку ((
uses crt,Graph;
&#46;&#46;&#46;
end&#46;

Для считыванием клавиш в графическом окне нужно использовать WinCRT.
CRT - для ...
informat
31.10.2011 06:25:12
Форум: Общие вопросы
Тема: Где искать список операторов с пояснениями и примерами?
Ответы: 5
Просмотры: 20220

Re: Где искать список операторов с пояснениями и примерами?

Всем здрасьте!
Вот, делаю первые шаги в программировании с помощью FPC.
По принуждению, но с удовольствием)))
Интересно, где можно найти перечень операторов с описанием их функций, и желательно с примерами для понимания синтаксиса и области применения. Я краем уха слышал, что это через HELP можно ...
informat
29.10.2011 06:45:36
Форум: Потрепаться
Тема: Lazarus, FPC, Delphi
Ответы: 8
Просмотры: 10668

Re: Lazarus, FPC, Delphi

Кажется вопрос был не о быстрой компиляции, а о быстрой работе приложения?

Я исследовал только на олимпиадных задачах. Т.е. консольные приложения.
Результат однозначный. Программы скомпилированные FPC работают быстрее Delphi.
informat
20.10.2011 06:15:03
Форум: Обучение Free Pascal
Тема: Приветствую всех
Ответы: 7
Просмотры: 13987

Re: Приветствую всех

Почему именно сортировка, и именно "пузырьком", и именно в Lazarus?
Может быть тут требуется курс "Базовое программирование"?
informat
16.10.2011 06:44:36
Форум: Обучение Free Pascal
Тема: Help. Как запускать FPC в полноэкранном режиме?
Ответы: 1
Просмотры: 4954

Re: Help. Как запускать FPC в полноэкранном режиме?

Если имеется ввиду оболочка, а не компилятор (FPC - компилятор), то следующим образом:
Обычно, после, в винде нажать ALT+ENTER. Но это будет текстовый режим, что не всегда удобно.
Я бы рекомендовал просто настроить окно, в котором запускается приложение. Увеличить шрифт, установить размеры.
Это всё ...
informat
23.09.2011 06:47:47
Форум: Обучение Free Pascal
Тема: Кодировка в окне ide
Ответы: 32
Просмотры: 38531

Re: Кодировка в окне ide

Н-да.. Видимо без скриншотов никак.

Написал программу в FP. Все русские буквы выглядят красиво.
http&#58;//s2&#46;itrash&#46;ru/idb/174/t2011-09-22_06_40_22&#46;png
...
И вопрос стоит кто как решает эти танцы с бубном. Пока последний вариант самый действенный, который решает проблему с русским ...
informat
22.09.2011 06:52:36
Форум: Обучение Free Pascal
Тема: Кодировка в окне ide
Ответы: 32
Просмотры: 38531

Re: Кодировка в окне ide

Нужно написать функцию конвертер. Пусть называется toAnsi(string). И использовать её в выводе write(toAnsi('Руский текст')).
Все трудности можно превратить в задачи, что будет способствовать более глубокому пониманию.
Боюсь, это Вы не поняли проблему. У человека проблема была именно в отсутствии ...
informat
21.09.2011 12:36:13
Форум: Обучение Free Pascal
Тема: Кодировка в окне ide
Ответы: 32
Просмотры: 38531

Re: Кодировка в окне ide

Ребят, я не спорю.. Все вы по своему правы. Но есть программа образования против которой пойти не могу. Школьникам надо пройти огонь и воду... А я не могу даже объяснить им на пальцах, почему в паскале не продумали работу с кириллицей из под винды. Редактор в одной кодировке. Запуск программы в ...