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

Turbo Pascal


Язык Турбо Паскаль. Форум программистов Turbo Pascal. Программирование на языке Turbo Pascal. Решение задач, программирование и готовые программы на Турбо Паскаль.
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
Новая тема
Темы раздела : Turbo Pascal Искать в этом разделе
Объявление
Показов: 4,595,177 Посмотреть объявление Объявление: Правила форума
20.11.2006 mik-a-el (Администратор)
  Рейтинг Тема / Автор Обновлено Ответов Показов
Важные темы
Важная тема Важно: Лучший ответ Графика в Турбо Паскаль (Тема на нескольких страницах 1  2  3  ... 7  8 )
23.12.2020 14:26
158 258,072
27.09.2014 09:56
3 53,894
27.10.2010 22:31
8 224,633
Обычные темы
Задать вопрос
Доброго времени суток! Помогите, пожалуйста написать программный код к этой задаче: Заданы два...
20.06.2014 16:10
5 6,117
Написать программу вычисления суммы элементов, находящихся под главной диагональю матрицы. B= (3 ...
20.06.2014 14:31
4 495
Матрица записана в файл по строкам переместить ее в другой файл
20.06.2014 14:14
5 1,115
В данном тексте заменить все символы, кроме цифр, на тире. подсчитать количество оставшихся в...
20.06.2014 14:01
4 2,591
Вывести на экран (в одну строку): а) все элементы побочной диагонали массива, начиная с элемента,...
20.06.2014 13:11
1 3,531
12.167. Дан двухмерный массив. Найти: а) строку с минимальной суммой элементов;
20.06.2014 13:02
1 1,089
Задана квадратная матрица. Найти максимальный по модулю элемент матрицы. Переставить строки и...
20.06.2014 13:01
1 1,587
Помогите в паскале сделать программу считающая линейную функцию Заранее спасибо
20.06.2014 12:24
4 3,507
Матрица, симметричная относительно главной диагонали, задана верхним треугольником в виде...
20.06.2014 11:10
1 3,335
Помогите решить эту ужасную задачу y=1-\frac{1}{2}-\frac{2}{2}-\frac{3}{2}-...-\frac{n}{2}
20.06.2014 11:08
7 1,730
построить график функции y=(x+3)/(x+2).
20.06.2014 10:44
1 887
Ребят помогите решить задачу ,а то я совсем не шарю =( Дан файл, содержащий набор сведений о...
20.06.2014 10:41
1 2,396
В молочных магазинах города Х продается сметана с жирностью 15, 20 и 25 процентов. В городе X был...
20.06.2014 09:59
1 1,298
Никак не могу разобраться с загрузкой файла.После того как загружаю текстовый файл ,программа не...
20.06.2014 08:48
1 620
y=\begin{cases}\prod_{i=9}^{20}\ i^2+i-2 &\ ,\ \ x<1\\\\\\\\\\\\x+e^x &\ ,\ \ x=9\end{cases} В...
20.06.2014 07:04
1 1,187
При компиляции ошибок не выдает, при вычислении после ввода Х значение суммы ряда и отклонения от...
20.06.2014 06:53
1 508
1.Создать и вывести массив Y с элементами Yi+1 где i номер варианта (вариант 9) Найти произведение...
19.06.2014 23:27
1 1,835
Объявите двумерный целочисленный массив, в котором n x m элементов. Выполните генерацию массива...
19.06.2014 23:24
1 2,391
Здравствуйте! Подскажите пожалуйста в чём ошибка в программе. Шаг 0,10 а в программе от как-то...
19.06.2014 21:26
4 1,445
Дан массив целых чисел{ai} (i=1, 2, …,n). Написать программу, проверки упорядочены ли значения...
19.06.2014 19:54
2 2,553
uses crt; label m1; var l,s,r:real; x,y,a,n,k,f:real; m:integer; const...
19.06.2014 19:24
0 476
Program Fibon; var n,k,a:longint; begin n:=0; repeat writeln ('Введите число'); readln...
19.06.2014 18:29
0 379
Program posl; var n,no,x,i,y:integer; begin Write ('Введите 1 число '); readln (x); n:=0;...
19.06.2014 18:28
0 413
Program Fibon; var n,k,a:longint; begin n:=0; repeat writeln ('Введите число'); readln (a);...
19.06.2014 18:28
0 486
program gt; var i,z,t:integer; function factor (a:integer):integer; var n,k:integer; begin...
19.06.2014 18:27
0 389
program fact; var i,g,l,z: integer; function factor (a:integer):integer; var n,k:integer;...
19.06.2014 18:26
0 397
Program school; var a,b: integer; procedure change(var x,y:integer); begin x:=x+y;...
19.06.2014 18:26
0 427
Program Form; var i,n,a,b: integer; var h,x,y: real; begin writeln ('Введите a,b,n');...
19.06.2014 18:25
0 641
Program N1; var M: Array of Integer; A: Real; I: Byte; begin Randomize; For I := 1 to 100...
19.06.2014 18:25
0 403
Program Bakteria; var i,n: integer; var s:real; begin Writeln ('Введите количество минут');...
19.06.2014 18:24
0 679
Program NoK; var y,m,n,x,z: word; {var x: real;} begin writeln('Введите 2 числа');...
19.06.2014 18:24
0 480
Program game; var a,n,x:integer; begin writeln ('Введите количество очков'); readln(x);...
19.06.2014 18:24
0 383
Program chislo; uses crt; var a,b,c,d,n:integer; begin clrscr; for n:= 1000 to 9999 do if (n...
19.06.2014 18:23
0 456
y=\sum_{i=5}^{n=-3}i
19.06.2014 18:19
1 1,001
Фамилии и имена 25 учеников класса записаны в двух различных таблицах. Напечатать фамилию и имя...
19.06.2014 18:10
2 3,318
Program posl; Uses Crt; var n,no,x,i,y:integer; begin clrscr; Write ('Введите 1 число...
19.06.2014 17:09
0 465
Program Kontr37; uses crt; const Pi=3.14; var n,p,q,Nn:real; var x,z:real; function...
19.06.2014 17:08
0 469
Program ist; var x: 1..12; begin writeln('Введите число'); readln(x); Case x of...
19.06.2014 17:07
0 516
program pr2; uses crt; var a,b,c,d: real; var l: boolean; begin clrscr; readln (a,b,c);...
19.06.2014 17:06
0 698
Program N2; var M: Array of Integer; max: Integer; I: Byte; begin Writeln('Введите 10 чисел:...
19.06.2014 17:04
0 471
program pr3; uses crt; var x,y,r: real; var l: boolean; begin clrscr; write ('Введите...
19.06.2014 17:04
0 365
Program N1; var M: Array of Integer; A: Real; I: Byte; begin Randomize; For I := 1 to 100...
19.06.2014 17:03
0 419
Program Fibon; var n,k,a:longint; begin n:=0; Repeat writeln ('Введите число'); readln (a);...
19.06.2014 17:02
0 404
Program Massivl; uses Crt; const N=10; var A: array of integer; і:іnteger; Begin Randomize;...
19.06.2014 17:01
0 384
Вот этот.
19.06.2014 16:11
1 2,040
Ребят всем привет. Может у кого есть инфа какие типы задач бывают по файлам и по модулям(конкретно...
19.06.2014 15:44
0 456
НАПИШИТЕ ПОЖАЛУСТА БЛОК СХЕМУ К ЭТОЙ ПРОГЭ А ТО НИ ОДИН ПРОГРАММНИК НЕ ВЫДАЕТ ЕЕ ПРАВИЛЬНО Program...
19.06.2014 14:56
0 511
В матрице найти минимальный элемент того столбца, который обладает максимальной суммой своих...
19.06.2014 14:32
0 634
Здравствуйте! Помогите, пожалуйста, сделать блок-схему к программе. Условие. Дан массив F1,...,...
19.06.2014 10:29
1 1,106
ребят помогите,а то я смысл уравнения даже не понял а зачет по информатике не могу получить.решить...
19.06.2014 10:14
6 1,608
Задать вопрос
Новая тема
Новые блоги и статьи
Nekobox - outbounds[0].transport: unknown transport type: raw
damix 01.10.2026
Фикс ошибки Правым кликом по серверу -> отладочная информация -> edit Заменить "net": "raw", на "net": "tcp", Нажать кнопку reload.
Программный домашний кинотеатр
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 и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .
Программа опроса у.з. расходомера 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) активировать флаг. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru