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

Free Pascal


Язык Free Паскаль. Форум программистов Free Pascal. Программирование на языке Free Pascal. Решение задач, программирование и готовые программы на Free Паскаль.
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
Новая тема
Темы раздела : Free Pascal Искать в этом разделе
Объявление
Показов: 4,597,887 Посмотреть объявление Объявление: Правила форума
20.11.2006 mik-a-el (Администратор)
  Рейтинг Тема / Автор Обновлено Ответов Показов
Задать вопрос
Бодрого времени суток, господа. Пытаюсь (безуспешно) решить такую проблему. Необходимо на экран...
06.10.2017 00:35
3 1,096
Васильку известно, что святой Николай начинает развозить подарки когда стемнеет, а заканчивает –...
05.10.2017 15:34
12 2,748
Ввести 4 числа . Если разность 2 и 3 числа равна 5 ,то найти сумму 1 и 4 числа
05.10.2017 02:14
4 1,433
Написал программу, потом решил ее немного переделать. Перекинул расчет функции в процедуру. Но...
03.10.2017 01:36
3 1,356
На оси абцисс берём точку A с координатой 1. Зеркально отражаем её относительно начала оси абсцисс...
29.09.2017 14:45
11 1,077
Условие использовать процедуру. Попробовала сделать через массивы: program...
28.09.2017 13:06
2 1,110
1. Описать массив записей, которые содержат в себе ведомости про каждого студента в вашей группе....
27.09.2017 20:17
1 1,163
Даны два значения G,F. F-не изменяется, G-начальное значение диапазона, найти функцию Z при условии...
27.09.2017 04:21
2 1,166
Мы только начали изучить С, я тупая, я вообще ничего не понимаю :wall: Прошли только циклы, такие...
24.09.2017 10:28
2 1,361
Нужно написать программу, применяя динамическую память, создающую массив на 100000 элементов
24.09.2017 01:12
2 1,603
Объясните принцип работы функции на примере
23.09.2017 23:51
1 846
Как нарисовать n-угольник заданный координатами своих вершин (x1; у1), (х2; у2), ..., (хn; уn) в...
22.09.2017 10:09
1 2,007
program project1; uses Crt,FIleUtil; var G,F,w,o,s,a:byte; i,p,d,j,h:integer; begin writeln...
18.09.2017 15:49
0 691
Срочно надо написать крестики нолики с ботом, которого нельзя выиграть (графикой). Времени в обрез,...
18.09.2017 08:54
1 2,072
Формулы a=\frac{\sqrt{\left|x-1 \right|}-\sqrt{\left|y \right|}}{1+\frac{x^2}{2}+\frac{y^2}{4}}­...
17.09.2017 12:18
2 1,703
program project1; uses Crt,FIleUtil; var G,F,s,o,a,w:byte; i,p,d,j,h:integer; begin writeln...
17.09.2017 12:10
3 833
Вычислить значение переменной S по формуле: S=\sum_{i=1}^{20}A{i}*B{i} где А и В – одномерные...
17.09.2017 08:13
1 1,486
На переменах Саша любит показывать своим одноклассникам фокусы. Необходимый атрибут любого...
16.09.2017 22:53
1 1,904
Найти элементы вещественного массива У (всего 6 элементов) по формуле:Y{i}=0.1*tg0.1{i} ...
16.09.2017 11:04
1 1,070
S=\sum_{i=1}^{20}{A}_{i}*{B}_{i} где А и В – одномерные целочисленные массивы, состоящие из 20-ти...
16.09.2017 10:47
1 1,105
В целочисленном массиве Х найти сумму элементов первой строки. Результат вывести на экран.
16.09.2017 08:47
1 1,440
Найти приближенное решение нелинейного уравнения методом Ньютона на заданном отрезке. Точность...
15.09.2017 20:28
3 1,373
Помогите отладить, ругается на power а точнее Error: identifier not found "power" s,t:real;...
14.09.2017 08:06
4 6,558
Ситуация такая. Работаю в Lasarus. Нужна помощь с реализацией программы. Задание: Разработать...
11.09.2017 08:37
4 843
Вот программа с недописанной логикой. Странно себе ведет. Если проследить путь, то в первом заходе...
10.09.2017 07:59
2 1,022
Есть у меня структура односвязного списка: type PSnow = ^TSnow; TSnow = record...
09.09.2017 23:41
1 2,413
У меня есть класс, как сделать метод сохранения в файл? То есть в класс OtdelListContainer нужно...
09.09.2017 16:07
2 948
Задача такова: Дано натуральное число n. Вычислить сумму вида: 1-1/2+1/3-1/4+1,5... Как решить...
09.09.2017 12:11
1 1,309
Дано натуральное число N (3≤N≤30). Сколько существует наборов из трёх натуральных чисел, сумма...
07.09.2017 13:48
1 2,583
Дано N целых чисел. ЗАДАЧА 5.1. Определить, все ли числа в наборе одинаковы. ЗАДАЧА 5.2....
07.09.2017 12:25
1 1,219
Задача Вводится любое слово, например: program Пример вывода: s=o Мое решение:
06.09.2017 20:28
4 2,453
Представить данную программу в виде отдельных процедур Program 1; uses crt; var f,g:text;...
06.09.2017 20:27
9 1,923
Даны три разных натуральных числа A, B, C. Определить наименьшее число, которое делится без остатка...
05.09.2017 20:50
2 3,406
Добрый день. Я новичок в этом деле и много еще не знаю. Нужно решить эту задачу, но сайт моего...
04.09.2017 10:47
1 3,461
МНЕ НУЖНО ЧТОБЫ ДАННАЯ ПРЕОБРАЗОВАННАЯ СТРОКА ИЗ "ПРОГРАММЫ 2" БЫЛА НЕ ТОЛЬКО НАПИСАНА В ОКНЕ...
03.09.2017 13:04
16 1,514
{$R+} var A : String; C : Char; begin A := 'Hello'; C := A; Writeln(C); Readln();
23.08.2017 20:05
6 2,101
Бодрого дня, господа. На досуге для себя лично в качестве тренировки сваял программулинку,...
23.08.2017 12:55
11 1,532
Бодрого дня, господа. Выкладываю свое позорище для всеобщего порицания/ругания и подсказания (по...
18.08.2017 15:45
15 1,822
Есть ли возможность считать из файла и записать в файл вещественное число (с запятой) в Паскале...
16.08.2017 10:27
3 901
Дано натуральное число n (n 9999). Выяснить, является ли оно палиндромом ( перевертышем ), с...
15.08.2017 19:25
4 17,030
uses GraphABC; const N = -50; var Pic1: Picture; procedure TruncColor(var a:...
13.08.2017 04:09
3 2,581
uses Crt, Graph; var gd, gm: integer; Color: byte; begin ClrScr(); gd :=...
11.08.2017 16:05
4 1,756
Есть ли возможность дописовать в файл, то есть добавлять данные?
10.08.2017 23:45
12 1,901
Где то читал что Random() возвращает LongInt. Но при var i : Integer; i = Random(5) ошибок нет. В...
10.08.2017 23:02
10 2,740
if a= 1 then else if a = 2 then else if a = 3 then (*или*) if a = 1 then if a = 2 then if a...
10.08.2017 17:06
3 877
Наткнулся тут на один интересную статью Например, сконструируем запись, в которой мы будем хранить...
10.08.2017 16:06
8 1,250
Процедура SetBkColor(c) - аналог ClearWindow(c)?
09.08.2017 19:51
1 1,848
Бодрого дня, господа. Столкнулся с не понятной для меня ситуацией. Для того, чтобы вычислить...
09.08.2017 16:37
2 3,782
Бодрого дня, господа. Я чуток в затруднении. В Си-шной программке есть функция: в начале...
08.08.2017 15:40
11 842
procedure Test(var a : string); begin a := 'Здесь больше 30 символов. А его это вообще волнует?...
08.08.2017 06:18
9 1,003
Задать вопрос
Новая тема
Новые блоги и статьи
Запустил конкурс "тем и промптов для текстовых квестов созданных почти чисто ИИ"
Adler 06.10.2026
Всем привет! За последние три-четыре дня я создал более 16 текстовых квестовых игр используя преимущественно по одному запросу к ИИ на игру. Мне так понравилось смотреть все ветки/ сцены во всех. . .
ИИ не может найти нужный язык в списке
Supersumestria 05.10.2026
Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .
Новая последняя моя музыка в SUNO
zorxor 05.10.2026
Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .
Программный домашний кинотеатр
russiannick 27.09.2026
Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого
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 и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru