Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Turbo Pascal Квадрат Пифагора, найти количество одинаковых цифр в числе https://www.cyberforum.ru/ turbo-pascal/ thread271255.html
Вобщем, нужно 2 программы: 1)которая виводит на экран квадрат Пифагора 2) Дано натуральное число "n". Вычислить сколько раз в нем встречается число "а" помогите кто-то)
Turbo Pascal Определить, является ли строка подстановкой n-ого порядка.
С клавиатуры вводится число n - порядок подстановки, и затем таблица из двух строк. Определите, является ли эта таблица подстановкой n-ого порядка. Пример: 5 1 2 3 4 2 4 2 1 3 5 No _______ 5 1 5 3 4 2 4 7 1 3 5
Turbo Pascal Процедуры и функции. Семиугольник Прошу помогите пожалуйста... Найти семиугольник с координатами вершин (x1,y1),(x2,y2),...,(x7,y7). Вывести на печать координаты треуголтника с максимальной площадью. Определение площади треугольника по формуле Герона оформить в виде фунцкции. https://www.cyberforum.ru/ turbo-pascal/ thread271248.html Turbo Pascal На сколько человек в восьмых классах больше, чем в десятых. Сведения об ученике состоят из его имени и фамилии и названия класса (года обучения и буквы), в котором он учится. Дан файл f, содержащий сведения об учениках школы. Выяснить, на сколько человек в восьмых классах больше, чем в десятых. В задаче должны быть использованы записи(record). https://www.cyberforum.ru/ turbo-pascal/ thread271238.html
Вывести на экран количество попыток угадать число Turbo Pascal
Программа угадайка генерирует случайные числа в пределах от 0 до 100 пользователь должен угадть его за 7 попыток program ygadaika; uses crt; var chu,pop:byte; chz:real; begin clrscr; randomize: chu:=0;pop:=0;chz:=int(random*100); writeln ('Компьтер загадал число от 0 до 100...'); writeln ('Вы должн угадать его за 7 попыток');
Turbo Pascal В N колхозах выращивают некоторые сельскохозяйственные культуры Из имеющегося перечня. Определить культуры: возделываемые во всех колхозах. В N колхозах выращивают некоторые сельскохозяйственные культуры Из имеющегося перечня. Определить культуры: возделываемые во всех колхозах. Решите пожалуйста)) https://www.cyberforum.ru/ turbo-pascal/ thread271226.html
Turbo Pascal Движение изображения Мне нужно чтоб по экрану двигалось изображение. Обычно я использую тупой способ, рисую изображение, потом его стираю (setfillstule(1,0); bar.(0,0,1000,1000).), а потом рисую чуть левее или чуть правее. Это нормально работает, если в качестве изображения линия или точка. А если нужно быстро подвигать по экрану большое залитое изображение, то всё будет ужасно мигать. Подскажите более рациональный... https://www.cyberforum.ru/ turbo-pascal/ thread271220.html Turbo Pascal написать программу для перевода велечин из однойц еденицы измерения в др
написать программу для перевода величин из одной единицы измерения в др Соотношения единиц считываются из файла. при вводе значений одной единицы измерения сразу отображается значение др. единиц той же размерности (длина площадь , вес , температура и т.д ) программа работает в текстовом режиме
Turbo Pascal Напишите программу, использующую функцию, которая вычисляет доход по вкладу https://www.cyberforum.ru/ turbo-pascal/ thread271215.html
15. Напишите программу, использующую функцию, которая вычисляет доход по вкладу. Параметрами функции являются величина вклада, процентная ставка и срок вклада. Процентная ставка (% годовых) и время хранения (дней) задаются во время работы программы. Рекомендуемый вид экрана: Введите исходные данные: Величина вклада (руб.) = Срок вклада (дней)= Процентная ставка (годовых)= Доход …………руб. ...
Turbo Pascal Сортировка прямыми вставками без барьера Здравствуйте, помогите с сортировкой прямыми вставками без барьера. С барьером программу написал, нужно предложить альтернативу барьеру. Помогите советом. Вот программа: uses crt; const n=4; type mas=array of integer; var a:mas; https://www.cyberforum.ru/ turbo-pascal/ thread271210.html
Turbo Pascal вычисления значения функции y = f(x)
СРОЧНО!!!Помогите составить программу вычисления значения функции y = f(x) c использованием операторов условных переходов. .
Turbo Pascal Работа с мышью Мне нужно сделать программу такого плана, при запуске передо мной появляется меню из 4 пунктов, когда я выбираю один из пунктов выполняется определённый раздел программы. Но проблема в том, что пункт нужно выбрать мышью, а я о работе с мышью не знаю ничего. Объясните, пожалуйста, как работать с мышью. https://www.cyberforum.ru/ turbo-pascal/ thread271198.html
Фрилансер
Эксперт С++
5845 / 1226 / 499
Регистрация: 23.11.2010
Сообщений: 3,375
Записей в блоге: 1
06.04.2011, 20:19 0

массивы - Turbo Pascal - Ответ 1526859

06.04.2011, 20:19. Показов 528. Ответов 7
Метки (Все метки)

Ответ

вместо
Pascal
1
delete(st,1,pos(':',st)+1);
замените на
Pascal
1
delete(st,1,pos(':',st));
Можно и самому догадаться и доделать, но нет, надо ж сидеть и ныть что б все сделали, с минимумом усилий со своей стороны

Вернуться к обсуждению:
массивы Turbo Pascal
1
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
06.04.2011, 20:19
Готовые ответы и решения:

Даны массивы а и b. Получить новые массивы a и b, элементы которых вычисляются по правилу: ai=bi, bi= -ai
Даны массивы а и b, состоящие из n-элементов каждый. Получить новые массивы a и b, элементы...

Файлы. Компоненты - массивы чисел. Переформировать файл, где сначала идут массивы с положительными макс. элементами
Здравствуйте!! я пишу такую задачу: нужно написать две программы, одна из них создает файл, где...

Даны массивы A(8), F(8),Q(8). Сформировать массивы С(8), каждый элемент которого вычисляется по формуле
uses crt; type mas=array of integer; var A,F,Q,C:mas; i,s:integer; begin clrscr; ...

Упорядочить массивы по по убыванию, потом соединить массивы в один упорядоченный массив
Начала писать, запуталась Даны два одномерных массива состоящие из 10 целых чисел. Упорядочить...

7
06.04.2011, 20:19
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
06.04.2011, 20:19
Помогаю со студенческими работами здесь

Табулирование функции и поиск данных. Одномерные массивы. Двумерные массивы
Вычислить сумму первых четырех отрицательных элементов. В соответствии с п. 5.16 правил...

Массивы. Циклические алгоритмы (Заполнить массивы случайными числами, лежащими в интервале 0 до 100)
Доброго дня, уважаемые форумчане, помогите пожалуйста решить задание. Заполнить массивы случайными...

Указатели и массивы. Индексация с помощью указателей. Передача массивов в функции. Динамические массивы (обработка матриц)
Для каждого элемента , bij, i= 1,...,n , j=1,...,n определяется свой многоугольник...

Попадание точки. Массивы чисел. Массивы записей.
Всем привет. По языкам задали три контрольные на си. Я сам си не знаю, даже не представляю, поэтому...

Структуры, массивы, указатели, динамические массивы структур
Помогите с решением задачи (прикрепляю условие). Заранее спасибо.

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

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru