Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Turbo Pascal Сумма модулей элементов массива расположенных после минимального по модулю элемента https://www.cyberforum.ru/ turbo-pascal/ thread35491.html
Помогите с задачками плизз. Нехочу всё лето с долгами разбираться. Выручите пожалусто. 1). В одномерном массиве состоящем из 25 вещественных элементов вычислить: Сумму модулей элементов массива расположенных после минимального по модулю элемента. Упорядочить элементы массива по убыванию модулей. 2). Задана матрица 10х10. Найти количество отрицательных элементов в тех строках, которые содержат...
Turbo Pascal Определение тактовой частоты процессора.
Подскажите пожалуйста, где можно найти программу на Турбо-Паскале или саму программу. Используя функции системного таймера ЭВМ определить быстродействие и производительность ЦП ПЭВМ для тестируемой инструкции процессора. На основании данных программы определить тактовую частоту процессора.
Turbo Pascal Отлов нажатия кнопок мыши https://www.cyberforum.ru/ turbo-pascal/ thread35387.html
С помощью какого прерывания можно узнать когда на жата какая-либо клавиша мыши. Зарание спасибо за помощь.
Turbo Pascal Дискриминант Подскажите как в турбо паскале прогу дискриминанта сделать https://www.cyberforum.ru/ turbo-pascal/ thread35296.html
Turbo Pascal Сформировать новый массив из элементов, кратных заданному числу
Сформировать новый массив из элементов, кратных заданному числу и расставить его элементы в обратном порядке. Я сделал что бы прога находила элементы кратные заданному число, а вот как рассатвить в обратном порядке не знаю...Нужно что бы обязательно было через присваивание...последнему элементу Номер 1 и так далее. это в третей процедуре ) program zadacha7; uses crt; type mass=array of...
Turbo Pascal Переименовать каталог, в котором хранится файл в паскале Можно ли переименовать каталог в которо хранится файл в паскале?если да то покажите пожалуйста ту процедуру которая это выполнит... https://www.cyberforum.ru/ turbo-pascal/ thread35180.html
Turbo Pascal В матрице Rab(4,12) содержаться сведения о численности работников 4 предприятий за 12 месяцев Пожалуйста решите ....я пробывал не могу решить :( За ранее спасибо большое ;),я вчера обращался но ни кто не мог сделать :( задача № 1 : В массиве Rab(12) содержаться сведения о численности работников предприятия за 12 месяцев. Рассчитать среднесписочную численность работников и напечатать номера месяцев,в которых численность была выше среднесписочной более чем на 10% -Написать программу для... https://www.cyberforum.ru/ turbo-pascal/ thread34998.html одномерный массив Turbo Pascal
Дан одномерный массив А, состоящий из N целых чисел. Сжать массив, удалив из него все элементы, модуль которых находится в интервале . Освободившиеся в конце массива элементы заполнить нулями.
Turbo Pascal Рэндомное движение обьекта https://www.cyberforum.ru/ turbo-pascal/ thread34715.html
Осуществляется случайное движение объекта в неком квадрате, каждое перемещение объекта - итерация цикла. Потому при движении объект сильно мерцает. Подскажите пожалуйста, как это исправить. вот код: program a1111; uses crt,graph; var gd,gm:integer; i,j:integer;c:char; xw1,yw1, a:integer;
Turbo Pascal Геометрия https://www.cyberforum.ru/ turbo-pascal/ thread34709.html
прямая на плоскости может быть задана уравнением ay+bx+c=0 где а и b одновременно не равны 0 будем рассматривать прямые только с целыми коэфициентами a b c пусть даны коэффициенты нескольких прямых a1 b1c1, a2 b2 c2,.., an bn cn 1) определить имеются ли среди этих прямых совпадающие или параллельные 2) Имеются ли три прямые имеющие общую точку 3) определить находятся ли данные прямые в общем...
Отбор строк с одинаковыми символами и без оных Turbo Pascal
Доброго здравия и благ всем Помогите, пожалуйста, с задачей. Надо f1.txt с массивом строк переписать в два других файла по условию: если в строке есть n (эадается заранее) одинаковых символов, в некоторых других строках также n одинаковых других или уже клонировавшихся символов, то такие строки собираются в один файл, а строки, не содержащие n одинаковых символов,...
Turbo Pascal Меню для программы-тест Народ, помогите пожалуйста!!!!!!!!!!!! У меня есть код проги-теста, нужно сделать для неё меню!!! оч нада!!! плс! Меню нужно елементарное - кнопка запуска теста, выхода, место для написания назв теста, и ищё одно поле в котором написано кто сделал! оч прошу помогите!!! Program HistoryTest; var RightCount:byte; answer:byte; begin RightCount := 0; writeln('Dlja vidpovidi na zapitannja... https://www.cyberforum.ru/ turbo-pascal/ thread34386.html
6 / 6 / 3
Регистрация: 21.05.2009
Сообщений: 17
21.05.2009, 18:07 0

Определить, есть ли среди цифр заданного числа одинаковые - Turbo Pascal - Ответ 169018

21.05.2009, 18:07. Показов 9027. Ответов 5
Метки (Все метки)

Ответ

1. да
2. да
3. символьный тип
4. да
5. while... до тех пор, пока ты не нажмешь enter, из введенных цифр будет "собираться" число. дальше, length находит длину слова (числа). и дальше начиная с первой цифры по последнюю мы их сравниваем, найдя хоть одно совпадение наращиваем к. ну и если это к больше нуля, то в числе есть совпадение цифр.

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

Выяснить, есть ли среди цифр заданного четырехзначного числа одинаковые
Задача: Выяснить, есть ли среди цифр заданного четырехзначного числа одинаковые. Заранее...

Определить, есть ли среди чисел такие, в которых сумма старшей и младшей цифр больше заданного числа
Помогите написать программу Определить, есть ли среди чисел диапазона, определяемого типом Byte,...

Определить, есть ли среди чисел такие, в которых сумма старшей и младшей цифр больше заданного числа
Определить, есть ли среди чисел диапазона, определяемого типом Byte, такие, в которых сумма старшей...

Определить, есть ли среди чисел такие, в которых сумма старшей и младшей цифр больше заданного числа
Определить, есть ли среди чисел диапазона, определяемого типом Byte, такие, в которых сумма старшей...

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

Есть ли среди первых N цифр заданного целого числа цифра K.
Надо решить задачу линейно или хотя бы составить линейный алгоритм. Есть ли среди первых N цифр...

Определить, есть ли среди цифр заданного числа одинаковые
Помогите.. Есть код #include <iostream.h> #include <conio.h> int main(int argc, char* argv)...

Определить, есть ли среди цифр заданного трехзначного числа есть одинаковые
Здравствуйте, необходима помощь в решении следующей задачи: Написать программу, в результате...

Определить: есть ли среди цифр заданного трёхзначного числа одинаковые
Дано трёхзначное число. Напишите программу, которая определяет: есть ли среди цифр заданного целого...

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