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

Leontev
22.04.2012 22:50:26
Форум: Обучение Free Pascal
Тема: Остановка анимации по нажатию клавиши
Ответы: 6
Просмотры: 14697

Re: Остановка анимации по нажатию клавиши

Код: Выделить всё

while key<>'s' ...


Неизвестный идентификатор 'key'...

Тут вопрос в чем. Что бы программа не спрашивала, продолжать ли ей выполнение после каждой итерации, а продолжала выполнение цикла до нажатия клавиши.
Leontev
22.04.2012 22:25:15
Форум: Обучение Free Pascal
Тема: Остановка анимации по нажатию клавиши
Ответы: 6
Просмотры: 14697

Re: Остановка анимации по нажатию клавиши

То есть как анимацию сделать, человечка нарисовать и пр. я вкурсе. Это несложно. Там задача в том, что на экран выводится зацикленная анимация. Её нужно остановить по нажатию клавиши. Как организовать цикл, в котором выводится изображение, что бы реализовать выход из него при нажатии клавиши?
Leontev
22.04.2012 22:19:40
Форум: Обучение Free Pascal
Тема: Остановка анимации по нажатию клавиши
Ответы: 6
Просмотры: 14697

Остановка анимации по нажатию клавиши

Собственно, мне нужно написать программы в которой при нажатии клавиши 'P' человечек делает упражнение. Прекращает его при нажатии клавиши 's'.

Собственно, как сделать так, что бы человечек останавливался при нажатии 's'?
Leontev
27.03.2012 21:11:05
Форум: Обучение Free Pascal
Тема: Заполнение матрицы
Ответы: 8
Просмотры: 14299

Re: Заполнение матрицы

Это идеально :D

Widowmaker писал(а):имхо, клетка 2х2 из единиц.


Ну да, так и есть. Как это реализовано в коде от Олега.
Leontev
27.03.2012 13:04:14
Форум: Обучение Free Pascal
Тема: Заполнение матрицы
Ответы: 8
Просмотры: 14299

Re: Заполнение матрицы

Спасибо большое! Но все равно есть одна проблема. Этот алгоритм не подходит, если n - четное число (
Leontev
24.03.2012 10:40:41
Форум: Обучение Free Pascal
Тема: Заполнение матрицы
Ответы: 8
Просмотры: 14299

Заполнение матрицы

Задача такая. Нужно сформировать динамическую матрицу, размером NxN и заполнить её по следующему принципу. В центре элемент (элементы) со значением 1. Вокруг - элементы со значением 2, далее три и т.п. Например, при n=5 матрица должна быть такой

5 4 3 4 5
4 3 2 3 4
3 2 1 2 3
4 3 2 3 4
5 4 3 4 5 ...
Leontev
04.03.2012 23:38:31
Форум: Обучение Free Pascal
Тема: проблема с чтением выражения.
Ответы: 9
Просмотры: 17270

Re: проблема с чтением выражения.

Спасибо большое :D

Как говорит наш преподаватель, поучу немного себя на этом примере.
Leontev
03.03.2012 20:36:11
Форум: Обучение Free Pascal
Тема: проблема с чтением выражения.
Ответы: 9
Просмотры: 17270

Re: проблема с чтением выражения.

Brainenjii боюсь, что не подойдет :(

Oleg_D писал(а):Я бы мог дать код, но сейчас нет времени.


Было бы неплохо. А то, честно говоря, все равно плохо себе представляю как из строки выделить двух, трех и т.д. значные цифра сохраняя при этом знак.
Leontev
02.03.2012 19:06:39
Форум: Обучение Free Pascal
Тема: проблема с чтением выражения.
Ответы: 9
Просмотры: 17270

Re: проблема с чтением выражения.

пока файл не закончится. Там в каждой строке такие последовательности идут. Например

Код: Выделить всё

23+123-14=
12-5=
1+3-1=


А в новый файл записать так

Код: Выделить всё

23+123-14=132
12-5=7
1+3-1=3
Leontev
02.03.2012 18:13:32
Форум: Обучение Free Pascal
Тема: проблема с чтением выражения.
Ответы: 9
Просмотры: 17270

Re: проблема с чтением выражения.

А что если цифры многозначные? Типа

Код: Выделить всё

23+123-14=
12-5=


И т.п.
Leontev
01.03.2012 23:01:02
Форум: Обучение Free Pascal
Тема: проблема с чтением выражения.
Ответы: 9
Просмотры: 17270

проблема с чтением выражения.

Задача такая. В исходном текстовом файле в каждой строке имеется последовательность вида

d+d-d+d=

Т.е. d- это какие-то случайные целые числа, между которыми либо +, либо -.
Записать эти последовательности в новый файл и после = записать результат выражения.

var f1,f2&#58;text;
sum&#58 ...
Leontev
09.02.2012 20:35:48
Форум: Обучение Free Pascal
Тема: метод итераций
Ответы: 4
Просмотры: 9740

Re: метод итераций

Честно говоря я вообще не уверен, что там хоть что-то правильное.

Добавлено спустя 2 минуты 7 секунд:
То есть, что вам нужно - остановить когда интервал будет меньше е, или больше оного? Подозреваю, что знак должно в другую сторону повернуть.

по условию итерации идут до тех пор, пока модуль ...
Leontev
09.02.2012 00:37:26
Форум: Обучение Free Pascal
Тема: метод итераций
Ответы: 4
Просмотры: 9740

метод итераций

Ну что ж, ладно, с интерактивным вводом выражений и извратными кодами поразбирались

Теперь проблема немного другая. Вот код с реализацией решения уравнения вида f(x)=0 методом итераций на интервале [0;0.85] c с точностью 0.0001 (вернее это задано по условию задачи). Уравнение, соответственно ...
Leontev
07.02.2012 18:20:25
Форум: Обучение Free Pascal
Тема: Как ввести выражение?
Ответы: 25
Просмотры: 34383

Re: Как ввести выражение?

SSerge
Верно. Мне сегодня в институте тоже это сказали. Ну что ж, зато от Алекса алгоритм интересный увидел )) не знаю, конечно, насколько он коректен с точки зрения кодирования, но на будущее может пригодится.