Форум программистов, компьютерный форум, киберфорум

Free Pascal


Язык Free Паскаль. Форум программистов Free Pascal. Программирование на языке Free Pascal. Решение задач, программирование и готовые программы на Free Паскаль.
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
Новая тема
Темы раздела : Free Pascal Искать в этом разделе
Объявление
Показов: 4,591,498 Посмотреть объявление Объявление: Правила форума
20.11.2006 mik-a-el (Администратор)
  Рейтинг Тема / Автор Обновлено Ответов Показов
Задать вопрос
Дан файл, содержащий текст на русском языке. Cоставить в алфавитном порядке список всех слов,...
17.01.2013 18:29
10 9,066
Дали задание написать елку таким образом: !!!!!* !!!!** !!!*** !***** ****** Без массивов, и...
17.01.2013 01:20
1 3,785
Ограничение времени: 1 с Входные данные В первой строке входного файла находится число N (1...
16.01.2013 23:28
0 1,642
Здраствуйте. Я решаю задачу, нам в школе задали, и вроде бы пишу все по правилам, но выдает ошибку...
16.01.2013 15:33
7 1,044
Сформировать квадратную матрицу B из элементов квадратной матрицы А. Каждый элемент bik должен быть...
16.01.2013 13:22
1 1,946
Решение: uses crt; var IOResult : Integer; f,g:text; m,k,i,v:byte; ...
16.01.2013 12:52
1 832
Можете создать программу по вычислению функции ?
16.01.2013 09:10
1 874
Ввести строку и занести ее в стек(procedure push, pop). Проверить , что открывающих и закрывающих...
15.01.2013 17:52
2 1,340
Никак не могу сделать домашнее задание. Облазил почти весь интернет, все ГДЗшки, учебники. Начал...
15.01.2013 17:00
4 624
Дано целое число n и вещественное число а. Вычислить s=sin1+sin1*sin2+....+sin1*sin2*....*sin­N.
15.01.2013 11:58
1 2,636
Объясните файловые процедуры в данной программе. Что значит каждое действие, связанное с файлом....
15.01.2013 09:24
1 1,262
Program Test1; Var a,b,c,d:real ; Function TRE (x,y,z:real):real; Begin ...
15.01.2013 09:21
1 1,770
Роль логической переменной в данном случае. Program Symbol; Var A: string; n, i: integer;...
15.01.2013 02:20
2 869
Ужас, что-то сегодня с мозгами не то. Во-первых, меня смущает фраза: "Реализуйте структуру...
14.01.2013 23:42
13 2,470
Нужно приспособить программу под данную формулу f(x) = Sinx/1+Sin2x/2+SIn3x/3+Sin4x/4+Sin5x/5 ...
14.01.2013 20:05
0 922
Отбивалка переделанная под собирателя,как сделать чтобы враг которого ловит дойдя до нижней части...
14.01.2013 19:09
0 941
Дано натуральное число n. Получить последовательность b1, ..., bn, где при i = 1, 2, ..., n...
14.01.2013 17:26
1 2,173
Вычислить бесконечную сумму с заданной точностью ε (ε > 0). Считать, что требуемая точность...
14.01.2013 17:00
0 479
Дано натуральное число n. Вычислить:
14.01.2013 16:56
0 504
Даны целые числа a1,a2,... Известно, что a1 > 0 и что среди a2,a3,... есть хотябы одно...
14.01.2013 16:42
0 2,070
Помогите решить задачу. Дан многочлен P(x)= Pn*x^n + P(n-1)*x^(n-1) + ... + P1*x + P0 найти...
14.01.2013 15:33
0 1,347
Кто сделает, буду очень признателен!Текстовая часть задания должна быть набрана вручную
14.01.2013 11:36
0 608
Создать выборку, состоящую из 30 человек, студентов у которых совпадает имя и год рождения....
14.01.2013 02:39
0 662
Есть рандомный массив от 1 до 28. Нужно выполнить проверку каждого элемента на наличие одинаковых...
14.01.2013 01:02
4 1,796
Решил задачу в турбо паскале всё отлично работает. Вот ссылка на задачу:...
13.01.2013 22:23
5 2,902
Собственно суть программы такова: Я работаю в турбо паскале. Но на этом сайте:...
13.01.2013 21:03
2 2,711
Дано целое число n. Чему равна сумма его цифр кратных 3.
13.01.2013 20:49
1 2,348
Найти целое число из интервала от A до B с максимальной суммой делителей.
13.01.2013 20:38
1 1,542
Free Pascal. Программа не работает. Вроде все правильно написала. Пишет: Error: Identifier not...
13.01.2013 12:58
2 1,388
здравствуйте. извините за нубство. но вот вроде сделал код program project1; {mode objfpc} ...
12.01.2013 17:16
2 2,256
Есть массив с рандомными числами(от -20 до 20). Нужно вывести номер элемента массива, который...
12.01.2013 16:05
2 4,808
В листинге программы встретил такую запись : while (port and 8) = 0 do; {ожидаем обратный ход...
12.01.2013 13:47
1 1,524
Здравствуйте! Реально ли решить эту задачу программой с сложностью O(logN) или O(logM)? ...
12.01.2013 08:25
4 2,074
Добрый вечер уважаемые форумчане! В очередной раз прошу вашей помощи. 2)Дано несколько слов, в...
12.01.2013 03:46
7 1,748
Дана строка символов. Словом будем называть группы символов, разделенных пробелами(одним или...
12.01.2013 00:57
12 4,147
Exitcode=1 :( Не знаю, почему вылетает: Program SredniStolbec; Uses Crt; Const n=5; ...
12.01.2013 00:30
14 903
Доброй ночи друзья требуется ваша помощь! 1)Сформировать запись "операторы ТР": оператор,...
11.01.2013 23:27
0 1,445
даны массивы A, B, C. переставьте элементы в них таким образом что слева подряд были записанны...
11.01.2013 21:44
2 1,326
Добрый вечер уважаемые форумчане! В очередной раз прошу вашей помощи. 1) Даны 2 строки с1 и с2,...
11.01.2013 21:29
2 1,895
Даны целые числа (c1,...,c95). Имеются ли в последовательности (c1,...,c95): а) два идущих подряд...
11.01.2013 15:27
3 3,045
const n=..; var A,B,C :array of real; Вычислить C=(A+B)^2 Пожалуйста помогите я на экзамене)...
11.01.2013 15:14
6 1,492
Здравствуйте, помогите с программкой. Дано n чисел. Сгенерировать последовательность этих чисел в...
11.01.2013 12:07
1 598
0, если х<= -3 F(x) = 1|(x+6),если x> -3.
11.01.2013 11:03
2 1,140
Помогите пожалуйста с ошибкой в программе. Нужно было определить, есть ли в текстовом файле(1)...
11.01.2013 09:51
4 965
Всем привет! Прошу помощи в решении сложной для меня задачи! Задача: Сформировать список,...
11.01.2013 00:42
2 1,234
Дана строка символов. Словом будем называть группы символов, разделенных пробелами. Подсчитать...
10.01.2013 23:35
1 1,594
Условие задачи:Дана матрица размера M x N и целое число K (1 < K < M). Найти сумму и произведение...
10.01.2013 19:57
2 640
Даны действительные числа (a1901, a1902...a1950) - количество осадков (в миллиметрах), выпавших в...
10.01.2013 17:19
1 5,431
Ввести файл в эту программу. Program temp; Const DAYS=28; Var t:array of integer;...
10.01.2013 10:10
1 487
Здравствуйте. Имеется книга Ю.Л Кетков, А.Ю. Кетков по FreePascal. В работе с графикой там описана...
10.01.2013 09:47
4 2,510
Задать вопрос
Новая тема
Новые блоги и статьи
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого
zorxor 21.09.2026
Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .
Мобильное приложение ColorStep
pavlinmavlin 17.09.2026
Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .
Запрет дублирования строк в табличной части
Maks 13.09.2026
Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр.
Jin X 06.09.2026
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .
Программа опроса у.з. расходомера SLS-720F
Argus19 02.09.2026
Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .
Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0.
Maks 31.08.2026
При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .
Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм
anaschu 30.08.2026
Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .
Оттачиваю умение писать js программы.
russiannick 30.08.2026
Проектом выходного дня стало написание Книги шифров Виженера. Итогом стала версия 200, синий туман. Синий туман назван так, потому что замораживает текст под собой. Нажатие синих кнопок управляют. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru