Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Pascal Помогите плиз с задачкой (одномерный массив) https://www.cyberforum.ru/ pascal/ thread13735.html
Создать одномерный массив A. Все его элементы, не равные нулю, переписать, сохраняя их порядок, в нача¬ло массива, а нулевые значения- в конец массива. Новый массив не заводить. :umnik:
Pascal Напечатать состояние массива через T секунд
:) Добавлено через 1 минуту 21 секунду дайте решение задачи плиз! В начальный момент в i-ом элементе массива записано число i (всего N элементов). Каждую секунду числа сдвигаются в следующую ячейку (из i-ой в i+1-ую), а из N-ой - в первую. Напечатать состояние массива через T секунд. Во вхоном файле записаны два числа - N (1≤N≤100) и T (0≤T≤30000).
Pascal Рекурсия: вывести все подмножества множества А https://www.cyberforum.ru/ pascal/ thread13701.html
С клавиатуры вводится множество А, состоящее из символов число которых не превышает 10 (1 символ= 1 элемент). Используя рекурсию (желательно) написать программу, которая выдаст на экране все подмножества множества А. Помогите, пожалуйста... Очень срочно!!!
Pascal Вывести на экран все трехзначные числа, сумма первой и третьей цифры которых больше второй цифры. https://www.cyberforum.ru/ pascal/ thread13695.html
Хорошая тема,поэтому ПОМОГИТЕ РЕШИТЬ ЗАДАЧУ!!!! Условие: Вывести на экран все трехзначные числа, сумма первой и третьей цифры которых больше второй цифры. Решить нужно двумя способами используя цикл с предусловием и используя цикл с постусловием. Заранее спосибо!
Pascal Поменять местами самый большой элемент с самым маленьким.
Нужно решить задачу по паскалю... задача звучит так: Дана последовательность х1,х2,…,хn. Поменять местами самый большой элемент с самым маленьким.
Pascal Марков и Тьюринг https://www.cyberforum.ru/ pascal/ thread13679.html
люди помогите написать интерпритаторы для машины Тьюринга и Алгорифмов Маркова
Pascal Организовать запись массива в файл Требуется создать массив, записи которого содержат следующую информацию: -о себе(ФИО, дата рождения, место проживания, место работы; -если мужчина вывести: --семейное положение (женат, не женат); --служба в армии (служил, не служил. -если женщина: --семейное положение (замужем, не замужем); --дети (если есть, то вывести год рождения, пол). Отсортировать полученный массив по алфавиту,... https://www.cyberforum.ru/ pascal/ thread13660.html Лабиринт из массива Pascal
Вот есть такая задача:Лабиринт задан матрицей a(m,n), состоящей из 0 и 1, причем а=0 и a=0. Разработать рекурсивную процедуру нахождения пути из клетки а в a. Путь должен состоять из элементов, равных 0. Ходить можно только по вертикалям и горизонталям Как я думал сначала использовать так называемое "правило правой(левой) руки" для прохождения лабиринта, но стал вопрос о том как например...
Pascal Рекурсия: вычислить сумму членов бесконечного ряда с заданной точностью Пользуясь рекурентной формулой вычислить сумму членов бесконечного ряда с заданной точностью e, |x|<1 :wall: S=\sum_{i=1}^{\infty}\left(-1 \right)^{n-1}\,\cdot\,\frac{2n-1}{\left(2n \right)!}\,\cdot\, x^{2n} https://www.cyberforum.ru/ pascal/ thread13620.html Pascal Найти среди максимальых элементов массива минимальный https://www.cyberforum.ru/ pascal/ thread13613.html
Помогите Пожалуйста Решить 2 задачи в Паскале. Вот собственно: 1. Даны массивы A и B, состоящие из целых чисел. Поставить сначала четные,а потом нечетные элементы.(Условие: Одномерный массив) 2. Дан целочисленный массив размером MxN. Найти среди максимальых элементов массива минимальный.(Двумерный массив) Каждая задача в отдельной программе. Заранее СПАСИБО!!!:):):) :help::help::help:
вычисление длин радиусов вписанной в треугольник и описанной возле треугольника окружностей Pascal
ПОмогите пожалуйста решить задачу, совсем паскаль не знаю, нужно очень срочно Составьте алгоритм и программу для вычисления длин радиусов вписанной в треугольник и описанной возле треугольника окружностей. Длины сторон треугольника равны a = 13 см., b=12 см., c = 17 см. Формулы: R=abc/4S r=S/P p=(a+b+c)/2 S=корень из p*(p-a)(p-b)(p-c)
Pascal Метод Гаусса Нужно запрограммировать метод Гаусса,я как только начинаю понимать-пытаюсь решить и тут же сразу запутываюсь https://www.cyberforum.ru/ pascal/ thread13582.html
4 / 3 / 0
Регистрация: 29.09.2008
Сообщений: 40
11.10.2008, 23:49  [ТС] 0

Определить для числа ближайшее (сверху), которое делится на 5 и 7 без остатка - Pascal - Ответ 60799

11.10.2008, 23:49. Показов 7549. Ответов 24
Метки (Все метки)

Ответ

Спасибо, попробую довести до дела )

Добавлено через 2 минуты 13 секунд
Цитата Сообщение от Puporev Посмотреть сообщение
Действительно ведь легкая. Вводишь любое целое число, хоть положительно, хоть отрицательное. В цикле repeat ..until или while .. do увеличиваешь это число на единицу пока не получится число, кратное 35 (7*5=35).
Вот вариант кода.
Код
uses crt;
var N:integer;
begin
clrscr;
Write('Введите целое число N=');
readln(n);
repeat
inc(N);
until (N mod 35=0)and(N<>0);{второе условие для отрицательных чисел, чтобы не выходил ноль, он у нас на все делится}
writeln('Это число=',N);
readln
end.

Просто нас не учат в Универе ничему, а просто дают Лабораторку, чтобы сами делали )
Ну вот я как не знаю Паскаль - поэтому доя меня сложно =(

Вернуться к обсуждению:
Определить для числа ближайшее (сверху), которое делится на 5 и 7 без остатка Pascal
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
11.10.2008, 23:49
Готовые ответы и решения:

Определить ближайшее нечетное число меньше заданного числа N, которое делится на 13 без остатка
Определить ближайшее нечетное число меньше заданного числа N, которое делится на 13 без остатка.

Определить ближайшее четное число меньше заданного числа N, которое делится на 7 без остатка
помогите плез

Найти ближайшее целое к первому числу, которое делится на второе число без остатка
Пользователь вводит два числа. Определить, делится одно число на второе без остатка. Если нет,...

Пользователь вводит два числа. Определить, делится одно число на другое без остатка. Если нет, предложить ближайшее
Пользователь вводит два числа. Определить, делится одно число на другое без остатка. Если нет,...

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

Даны три разных натуральных числа A, B, C. Определить наименьшее число, которое делится без остатка на эти 3 числа
Даны три разных натуральных числа A, B, C. Определить наименьшее число, которое делится без остатка...

Найти все целые числа b, для которых а делится без остатка на b^2 и не делится без остатка на b^3
Пользователь вводит любое целое число а. Необходимо вывести все целые числа b , для которых а...

Вывести все целые числа В, для которых А делится без остатка на В*В и не делится без остатка на В*В*В
Кто может решите пожалуйста задачу с помощью циклов. Задание 4: Пользователь вводит любое целое...

Найти ближайшее целое число к данному числу, которое делится на второе число без остатка
Пример 1. Есть числа 35 и 14. 35 не делится на 14 без остатка, поэтому ищем ближайшее целое число...

Определить ближайшее нечетное число меньше заданного числа N, которое делится на 15 с остатком 6
задание такое: Определить ближайшее нечетное число меньше заданного числа N, которое делится на 15...

Определить ближайшее нечетное число меньше заданного числа N, которое делится на 15 с остатком 6
Определить ближайшее нечетное число меньше заданного числа N, которое делится на 15 с остатком 6

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