Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
PascalABC.NET Клиент-серверное приложение для защищённой передачи файлов по сети https://www.cyberforum.ru/ pascalabc-net/ thread1816355.html
Нужно создать разработать программу на Паскале клиент-серверное приложение для защищённой передачи файлов по сети. Как это вообще возможно сделать? Я в этом не бум бум:-|
PascalABC.NET Вычислить сумму отрицательных элементов массива и найти максимальный по модулю элемент
В одномерном массиве с n действительных элементов вычислить сумму: отрицательное элементов массива и найти максимальный по модулю элемент.
PascalABC.NET Найти произведение первых трёх нечётных цифр числа https://www.cyberforum.ru/ pascalabc-net/ thread1816003.html
Помогите, пожалуйста, разобраться с задачей: С клавиатуры вводится длинное целое число, не менее 50 цифр. Найти произведение первых трех нечетных цифр числа. Я так понимаю, нам нужно каждое число из введённого массива проверить на нечётность. А как затем выбрать только первых три нечётных и их произведение ?
PascalABC.NET Клик мышью https://www.cyberforum.ru/ pascalabc-net/ thread1815975.html
Привет! Помогите написать программу, которая делает определенное действие если ,я нажму на определённый объект Не могу забраться с этими процедурами нажатие мыши OnMouseDown отпускание мыши OnMouseUp
PascalABC.NET Задача Иосифа Флавия
По окружности в направлении движения часовой стрелки расположены n последовательных натуральных чисел от 1 до n . При перемещении по числам 1, 2, … каждое k -ое число (k>1) вычеркивается (удаляется). Этот процесс продолжается до тех пор, пока чисел не станет меньше k. Определить оставшиеся числа.
PascalABC.NET Исключить из текста слова, длина которых больше заданного числа https://www.cyberforum.ru/ pascalabc-net/ thread1815449.html
Помогите, пожалуйста, с задачей: Дано предложение, слова в нем разделяются пробелом, в конце стоит точка. Исключить из текста слова, длина которых больше заданного числа. Как узнать, какое слово в строке меньше, чем я задал ? Я так понимаю, нужно проверить от начала слова до первого встречающегося пробела, и выполнить это до конца всей строки ?
PascalABC.NET Вывести в порядке убывания все простые числа Вводится произвольные натуральные числа от 1 до 100 , которые не повторяются , диапозон от 1 до 255. Вывести в порядке убывания все простые числа https://www.cyberforum.ru/ pascalabc-net/ thread1815438.html Удалить из натурального числа случайные цифры PascalABC.NET
Дано натуральное число N. Сколько цифр в числе N, столько раз получить случайным образом цифру, и вывести ее на экран. Если эти цифры встречаются в записи числа N, то изъять их из записи этого числа. Вывести на экран полученное число. Помогите,пожалуйста.
PascalABC.NET В одномерном массиве поменять местами первый макс. элемент с последним мин. элементом https://www.cyberforum.ru/ pascalabc-net/ thread1815289.html
Здравствуйте, у меня возникли некоторые сложности с заданием которое звучит так: В одномерном массиве поменять местами первый максимальный с последним минимальным элементом массива. массив заполнять из текстового файла, его размерность тоже должна находиться в файле. Использовать функции поиска максимального, минимального элементов и процедуры для ввода, вывода и обмена элементов массива. ...
PascalABC.NET Таблица значений функции https://www.cyberforum.ru/ pascalabc-net/ thread1815093.html
Составить таблицу значений функции f(x) на отрезке с шагом h f(x)|a|b|h \sqrt{\sin ^2x}|-\pi|\pi|\frac{\pi}{4} Результат вывести на экран в виде \begin{array}{ll}x &f(x) \\\hline x_{1} &f_1(x) \\ x_{2} &f_2(x) \\ x_{3} &f_3(x) \\ & \\\\\\ ...\text{ } &... \end{array}
PascalABC.NET Конвертер из Pascal в HTML
Написал программу на паскале, можно ли ее как нибудь конвертировать в html?
PascalABC.NET Подсчет количества информации в заданной строке https://www.cyberforum.ru/ pascalabc-net/ thread1814731.html
Помоги пожалуйста. Необходимо подсчитать количество информации (Любое предложение) разными подходами: Вероятностный: равновероятностные исходы; неравновероятностные исходы; Объемный (Алфавитный).
0 / 0 / 0
Регистрация: 19.08.2016
Сообщений: 11
0

Программа приостанавливается - PascalABC.NET - Ответ 9592761

30.09.2016, 00:16. Показов 1076. Ответов 5
Метки (Все метки)

Author24 — интернет-сервис помощи студентам
Компилируется но потом виндовс останавливает выполнение...
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
Uses graphABC,Events,crt;
 
const n = 10;
 
var X,Y,R : array [1..n] of integer;
    i : byte;
    
 procedure MouseDown(x,y,md : integer);
begin
 Clrscr;
end;   
 
begin
 
SetWindowSize(600,400);
SetBrushColor(ClYellow);
 
For i := 1 to n do
begin
 R[i] := Random(50) + 20;
 X[i] := Random(300) + 200;
 Y[i] := Random(200) + 100;
 Circle(X[i],Y[i],R[i]);
 OnMouseDown := MouseDown;
  end;
end.


Вернуться к обсуждению:
Программа приостанавливается PascalABC.NET
0
Лучшие ответы (1)
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
30.09.2016, 00:16
Готовые ответы и решения:

Программа приостанавливается на цикле while
При выполнении программы возникла такая неприятность: после старта останавливается на одном месте и...

Java FX – Поток приостанавливается некорректно
Всем привет. Пытаюсь написать симулятор чата, который генерирует сообщения в отдельном потоке. Этот...

WindowsMediaPlayer (WMP) и WPF DispatcherTimer: воспроизведение приостанавливается
Проблема возникла при создании простенького mp3-плеера. Через таймер сделал изменение позиции...

Программа не может быть запущена, т.к. на Вашем компьютере установлена программа-эмулятор
При запуске лицензионной детской игровой программы выскакивает сообщение: Программа не может быть...

5
30.09.2016, 00:16
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
30.09.2016, 00:16
Помогаю со студенческими работами здесь

Программа подсчета числа неуспевающих и программа поиска владельца автомобиля...
Помогите пожалуйста решить 2 задачи: Составьте программу подсчета числа неуспевающих по...

Квин-программа, или программа, печатающая свой исходный текст
Задаю этот вопрос под влиянием этой темы и предлагаю решение: Sub Kvin() Dim A(1 To 13) As...

Программа циков с неизвестным число повторений и программа с внутренним ветвлением
1.Дано натуральное число n. Получить наименьшее натуральное число вида m в степени 2, превосходящее...

Не могу понять почему программа не выводит результат (простейшая программа)
Здравствуйте уважаемые форумчане! Я начал изучать C++ при помощи книги. На днях я столкнулся со...

Программа с метками и оператором перехода GOTO. Программа с циклом полусловия
Задача №9. Прошу вас, помогите. Не знаю как решать вообще.

Программа , которая выводит время, за которое программа работает
Вообщем, нужно что бы считалось время от начала работы программы, и выводилось на экран.

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru