Turbo Pascal

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Turbo Pascal Разделить предметы на две группы так, чтобы общие веса были максимально близки Имеется n предметов, веса которых равны A1, A2, …, AN. Разделите эти предметы на две группы так, чтобы общие веса двух групп были максимально близки. помогите пожалуйста https://www.cyberforum.ru/ turbo-pascal/ thread621314.html	Получить новый массив путем деления всех элементов массива на его наименьший элемент Turbo Pascal Решите плиз задачи 2)19. Дан двумерный массив размерностью n*m, в котором не все элементы равны нулю. Получить новый массив путем деления всех элементов массива на его наименьший элемент. Если наименьший элемент равен нулю, то вывести соответствующее сообщение, а элементы массива оставить без изменения.
Turbo Pascal Найти среднее арифметическое наибольшего и наименьшего значений элементов матрицы Дана действительная матрица a 6*9 . Найти среднее арифметическое наибольшего и наименьшего значений ее элементов. Program mas; const n=6; m=9; var a: array of integer; i,j,min,max: integer; begin randomize; https://www.cyberforum.ru/ turbo-pascal/ thread621068.html	Turbo Pascal В файл H записать все латинские буквы (большие и маленькие) файлов F и G https://www.cyberforum.ru/ turbo-pascal/ thread621061.html Даны символьные файлы F и G. В файл H записать все латинские буквы (большие и маленькие) файлов F и G. Program fail12; Var f,g,h:text; s,s1:string; i:byte; Begin Assign(f,'a.txt');Reset(f); Assign(g,'b.txt');Reset(g); Assign(h,'c.txt');Rewrite(h);
Подпрограммы: Вычислить определитель матрицы Turbo Pascal Сделать с помощью подпрограммы. 1 Вычислить определитель матрицы А (3х3).	Turbo Pascal Подпрограммы: Вычислить тангенс гиперболический Сделать с помощью подпрограммы. 3 Вычислить тангенс гиперболический tg x=\frac{{e}^{x}-{e}^{-x}}{{e}^{x}+{e}^{-x}} https://www.cyberforum.ru/ turbo-pascal/ thread621056.html
Turbo Pascal Пусть дано n произвольных четырехугольников. Найти четырехугольник с максимальной площадью https://www.cyberforum.ru/ turbo-pascal/ thread621051.html Пусть дано n произвольных четырехугольников, заданных координатами своих вершин. Найдите четырехугольник с максимальной площадью. Напишите функцию для нахождения площади четырехугольника.	Turbo Pascal Для каждой буквы заданного текста указать,сколько раз она встречается в тексте. Для каждой буквы заданного текста указать,сколько раз она встречается в тексте.
Turbo Pascal Подсчитать в строке сколько букв A и B,если букв A больше, чем B,то удалить в строке все символы B. Подсчитать в строке сколько букв A и B,если букв A больше, чем B,то удалить в строке все символы B. https://www.cyberforum.ru/ turbo-pascal/ thread621046.html	Turbo Pascal Определить число свободных мест в любом из вагонов поезда В поезде 18 вагонов,в каждом из которых 36 мест. Информация о проданных на поезд билетах хранится в двухмерном массиве,номера строк которых соответствуют номерам вагонов,а номера столбцов - номерам мест. Если билет на то или иное место продано,то соответствующий элемент массива имеет значение 1, в противном случае - 0. Составить программу,определяющую число свободных мест в любом из вагонов... https://www.cyberforum.ru/ turbo-pascal/ thread621044.html
Turbo Pascal Добавить в однонаправленный(двунаправленный) список элемент с заданным номером Добавить в однонаправленный(двунаправленный) список элемент с заданным номером.	Turbo Pascal N! делится на P в степени M,но не делится на P в степени M+1. https://www.cyberforum.ru/ turbo-pascal/ thread621041.html На входе программе даются два числа N и P. Программа на выходе должна дать такое максимальное число M,что N! делится на P в степени M,но не делится на P в степени M+1. Примечание: 1. Числа N и P так велики,что нет смысла считать значение N!. 2. Числа N и P являются натуральными.

VladislavTepes

80 / 80 / 14

Регистрация: 27.06.2012

Сообщений: 555

Записей в блоге: 1

ООП в Паскаль - Turbo Pascal - Ответ 3252402

09.07.2012, 20:28. Показов 1085. Ответов 2

Метки (Все метки)

Студворк — интернет-сервис помощи студентам

Назрел такой вопрос:возможно ли создание программ для Windows на паскаль?Пытался откомпилить это:

Pascal

program HelloApp;
 
             uses WObjects;
 
             type
               THelloWord = object(TApplication)
                  procedure InitMainWindow; virtual;
               end;
 
             procedure THelloWord.InitMainWindow;
             begin
                 MainWindow := New(PWindow,
                                     Init(nil, 'Hello, Borland Pascal'));
             end;
 
             var HelloWord: THelloWord;
 
             begin
                HelloWord.Init('HelloWord');
                HelloWord.Run;
                HelloWord.Done;
             end.

Турбо ругается,что не найден wobjects.tpu.Дал ему Wobjects.Затем ругается,что нет windows.tpu.Решил скомпилировать в компиляторе от Борляндии.При компиляции говорит,что "Unit file format error" и указывает на ВОбжектс.Как все это решить и вообще возможно ли вывести так хотя-бы простейшую форму?

Вернуться к обсуждению:
ООП в Паскаль Turbo Pascal

Следующий ответ

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

09.07.2012, 20:28

Готовые ответы и решения:

ООП Турбо Паскаль
Помогите, пожалуйста. Срочно нужно. Нарисовать закрашенный квадрат, вписанный в окружность...

Паскаль графика(ООП)
Помогите с программой, не понимаю в чем ошибка и как исправлятьprogram spliner_1; uses...

Кто учил Паскаль по книге "Паскаль для школьников Ушаков Д.М,Юркова Т.А" отпишитесь
Ребят кто учил Pascal по книге "Паскаль для школьников Ушаков Д.М,Юркова Т.А" ,в общем дело такое...

Посоветуйте литературу по ООП на паскаль
Посоветуйте литературу по ООП(Обьетно ориентированному программированию) на паскаль abc.net

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

09.07.2012, 20:28

Помогаю со студенческими работами здесь

Определяет кол-во вхождений одной Паскаль-строки в другую Паскаль-строку.
Здравствуйте. Не могли бы вы мне помочь написать программу, совсем не могу понять как ее написать....

ООП ради ООП
Доброго времени суток! Есть к примеру класс Cat который реализует интерфейс Movable, инкапсулирует...

Снова перевести с Турбо Паскаля на Паскаль АВС или Паскаль АВС.Нет
program derevo; uses crt, graph; function cx(length, angle:real):integer; begin ...

ООП
Например есть у меня родительский класс ololo =class procedure method1; virtual; end;...

Наверх