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

Turbo Pascal


Язык Турбо Паскаль. Форум программистов Turbo Pascal. Программирование на языке Turbo Pascal. Решение задач, программирование и готовые программы на Турбо Паскаль.
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
Новая тема
Темы раздела : Turbo Pascal Искать в этом разделе
Объявление
Показов: 4,595,242 Посмотреть объявление Объявление: Правила форума
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
Обычные темы
Задать вопрос
Дано число n. Найти сумму и количество его цифр
27.11.2019 20:06
1 583
Дано число n. Поменять местами минимальную и максиимальную цифры
27.11.2019 20:04
1 859
Дано число n. Найти в нем максиммальную цифру
27.11.2019 20:03
1 839
program SaShA; var Z:Real; x:integer; begin read(x); if x>=2 then Z:=(2*x+1)*cos(x) ...
27.11.2019 18:50
15 2,327
Дана непустая и упорядоченная по возрастанию последовательно целых чисел, оканчивающаяся числом 10...
27.11.2019 18:11
2 1,798
Дано квадратную матрицу А размера nхn целых чисел. Получить b1, ..., bn. , Где bi- это значение...
27.11.2019 16:00
2 1,155
. Задана последовательность N вещественных чисел. Вычислить где М — среднее арифметическое...
27.11.2019 15:50
7 8,343
Задача: У продавщицы есть монеты по 5, 10, 15, 25, 50 сколько способов есть дать сдачу которая...
27.11.2019 12:53
1 534
как сформировать и вывести на экран массив квадратных корней из двухзначных чисел
27.11.2019 11:42
2 691
Дано c и d. Если c=d, то вычислить: z=c^2+ cos d÷0,17. Если c<d, то напечатать c и d. Если c>d,...
27.11.2019 11:23
1 1,185
По данным значениями длин сторон треугольника a, b, c вычислить его а) периметр; б) площадь; в)...
27.11.2019 10:35
8 2,946
Дана строка слов, разделенных запятой. Необходимо вывести строку, в которой буквы каждого слова...
27.11.2019 10:19
1 707
Здравствуйте, подскажите, как решать данное задание без использования массивов. Вывести на экран...
27.11.2019 10:18
1 3,292
Посчитать, сколько слов в строке, которая заканчивается точкой. А также вывести длину строки. ...
27.11.2019 07:22
5 3,442
Дана координатная плоскость и прямая на ней. Определите, точка с координат. (х,у) лежит на прямой,...
26.11.2019 20:57
1 3,751
Необходимо ввести 2 строки. Получить строку, в которой чередуются слова 1-й и 2-й строки. Если в...
26.11.2019 10:36
1 800
var S,S1,mr,st:string; gr,G,u,x,y:integer; begin write('Введите фамилию, год, место ');...
25.11.2019 17:40
4 1,113
Паскаль Турбо, написать программу Дан символьный массив Х, размерностью 4*4. Первая строка...
25.11.2019 11:25
2 842
Составить программу, которая читает текст, считает число ключевых слов ‘begin’ и число ключевых...
25.11.2019 08:08
2 1,177
Есть код программы но он почему то не работает. program first; var z,x:integer; begin...
24.11.2019 23:43
1 1,183
Если суммы элементов строк матрицы упорядочены по убыванию, то найти максимальный по модулю...
24.11.2019 19:18
1 2,164
Два натуральных числа называются дружественными, если каждое из них равно сумме всех делителей...
24.11.2019 17:25
1 2,676
23.11.2019 23:33
1 727
Найти все возможные значения длины гипотенузы в прямоугольном треугольнике с целыми сторонами, если...
23.11.2019 22:51
1 2,201
В галактике «Milky Way» на планете «Snowflake» есть N городов, некоторые из которых соединены...
23.11.2019 16:33
3 2,539
Дан массив C(m), m⩽17. Вычислить сумму S элементов с нечетными номерами, удовлетворяющих условию...
23.11.2019 15:12
3 3,752
var t,p,a,b,c,d,e,f,g: real; function Fact ( x: real): real; var y: real; const a=1;...
23.11.2019 14:25
1 1,006
В галактике «Milky Way» на планете «Snowflake» есть N городов, некоторые из которых соединены...
23.11.2019 13:51
5 3,420
Создать програму для подсчета кол-ва совпадений символов в заданом тексте. По типу: 1)аб 2)абв...
23.11.2019 11:40
1 961
Дана квадратная матрица, состоящая из натуральных чисел. Определить произведение ненулевых...
23.11.2019 10:45
1 1,080
Помогите с заданием:3 Составить циклический алгоритм и программу для вычисления результата по...
23.11.2019 09:26
2 874
Дан график. Определите, лежит ли точка Z с координатами (х;y) внутри заштрихованной фигуры? (и...
23.11.2019 09:09
2 1,717
Здравствуйте! Подскажите как записать ln^2(x*y*z) в паскале
23.11.2019 08:20
1 999
Гена собирается на туристический слет учеников своей школы. В своем классе он был назначен...
22.11.2019 19:19
3 5,094
Используя среду программирования выполнить задание. Даны два массива А и В по четыре элементов в...
22.11.2019 09:28
1 762
Дано матрицу 2Nx2N, условно состоит из 4х матриц NxN. Поменять местами две матрицы NxN, стоящих на...
21.11.2019 20:33
7 831
Помогите написать задание: Дан массив B(m), m15. Все элементы с четными номерами удвоить, а с...
21.11.2019 17:43
1 4,736
Разработать учебную программу для проверки знаний студентами некоторых символов языка Turbo Pascal....
21.11.2019 14:27
2 882
Здравствуйте, помогите написать программу Паскаль турбо. Дан массив A размерностью N...
21.11.2019 13:16
1 1,140
Разработать программу, которая работает следующим образом. Пользователь вводит свою фамилию, год...
21.11.2019 07:58
1 1,213
21.11.2019 05:14
3 969
В введенной строке подсчитать и вывести на экран количество слов,начинающихся с буквы "а",а также...
20.11.2019 09:35
1 1,429
Program Razlojeni_cisla; uses crt; var n,i,s,j:integer; procedure desc(j,s,k:integer); var...
20.11.2019 07:00
1 973
Дана таблица А(6,4). Сформировать линейную таблицу В, где В(Строка) - значение первого по порядку...
19.11.2019 21:57
7 2,157
Найти в строке D число Y, и увеличить его в 3 раза, а результат записать в строку D вместо числа Y....
19.11.2019 15:42
1 963
Дано натуральное число n (n≤100), определяющее возраст человека (в годах). Дать для этого числа...
19.11.2019 12:55
2 15,152
Задача А: Написати програму яка створює файл, що містить інформацію про розклад телепрограм на...
18.11.2019 23:19
1 1,431
Условия примера во вложении. Хочу понять, что я делаю не так? program lab4_1; var x,y:real;...
18.11.2019 21:53
2 1,373
Собственно задача в заголовке. Имеется такой код: program slova; uses System.SysUtils; ...
18.11.2019 17:44
3 788
Разработать программу ведения телефонного справочника, снабдить программу меню: * дополнить...
18.11.2019 08:45
1 1,238
Задать вопрос
Новая тема
Новые блоги и статьи
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