|
|
Другие темы раздела | |
PascalABC.NET Найти все тройки Пифагора, в которых каждое число меньше заданного Н Натуральные числа a, b, c называются тройкой Пифагора, если выполняется условие a2+b2=c2. Требуется найти все тройки Пифагора, в которых каждое число меньше заданного N. Ответ записать в файл c именем FileName, располагая по одной тройке в строке. https://www.cyberforum.ru/ pascalabc-net/ thread664780.html |
PascalABC.NET На отрезке найти все натуральные числа, сумма цифр которых при умножении числа на А не изменится На отрезке найти все натуральные числа, сумма цифр которых при умножении числа на A не изменится. |
PascalABC.NET Найти все натуральные числа, у которых сумма цифр, стоящих в нечетных разрядах равна заданному числу Найти все N-значные натуральные числа (1<N<9), у которых сумма цифр, стоящих в нечетных разрядах равна N. Нумерацию разрядов вести справа налево, начиная от разряда единиц. Ответ записать в файл c именем FileName, располагая по одному числу в строке. https://www.cyberforum.ru/ pascalabc-net/ thread664774.html | PascalABC.NET Требуется определить, является ли данная последовательность чисел знакоположительной Дан текстовый файл с именем FileName, в первой строке которого записано единственное число N, а во второй строке последовательность из N целых чисел, разделенных пробелами. Требуется определить, является ли данная последовательность чисел знакоположительной (все элементы больше нуля). Обязательно использовать логическую переменную и НЕ использовать оператор ветвления в теле цикла. Массивы... https://www.cyberforum.ru/ pascalabc-net/ thread664772.html |
PascalABC.NET Сгенерировать N (N вводится из текстового файла) случайных целых чисел из промежутка [–100; 100] Сгенерировать N (N вводится из текстового файла) случайных целых чисел из промежутка . Записать их в текстовый файл. Вычислить минимум этих чисел и дописать результат в конец файла с помощью процедуры append. |
PascalABC.NET Найти все натуральные числа, такие, что если к сумме цифр числа прибавить квадрат этой суммы, то получится само число Найти все N-значные натуральные числа (1<N<5), такие, что если к сумме цифр числа прибавить квадрат этой суммы, то получится само число. https://www.cyberforum.ru/ pascalabc-net/ thread664716.html |
PascalABC.NET Найти все числа, в записи которых имеетcя K подряд идущих нулей Задание:Найти все натуральные числа, меньшие N, в записи которых имеетcя K подряд идущих нулей. Var n,k,m,i,a,z:Integer; fl:Boolean; Begin ReadLn (n); ReadLn (k); fl:=false; m:=0; For i:=1 to n do Begin a:=i; https://www.cyberforum.ru/ pascalabc-net/ thread664710.html |
Из текстового файла переписать в новый файл и вывести все четные числа PascalABC.NET Нужна помощь! Из текстового файла f, содержащего целые числа, переписать в файл g и вывести на экран все четные числа. |
PascalABC.NET Описать процедуру ShiftRight3(A, B, C), выполняющую правый циклический сдвиг Нужна помощь в решении задачи! Описать процедуру ShiftRight3(A, B, C), выполняющую правый циклический сдвиг: значение A переходит в B, значение B — в C, значение C — в A (A, B, C — вещественные параметры, являющиеся одновременно входными и выходными). С помощью этой процедуры выполнить правый циклический сдвиг для двух данных наборов из трех чисел: (A1, B1, C1) и (A2, B2,C2). https://www.cyberforum.ru/ pascalabc-net/ thread664646.html |
PascalABC.NET Описать функцию IsPalindrome(K), возвращающую True, если целый параметр K является палиндромом
https://www.cyberforum.ru/ pascalabc-net/ thread664645.html Добрый день! Нужна помощь в решении задачи! Описать функцию IsPalindrome(K), возвращающую True, если целый параметр K (> 0) является палиндромом(т. е. его запись читается одинаково слева направо и справа налево), и False в противном случае. С ее помощью найти количество палиндромов в наборе из 10 целых положительных чисел. |
Как сделать что бы индексы были "зациклены"? PascalABC.NET Доброго времени суток. Появилась необходимость сортировки строкового массива (string) таким образом: Задаётся число n, и далее i-тый элемент массива меняется местами с i+n элементом массива. Проблема в том что индекс выходит за границы массива(размер статичен и равен 154) Как сделать что бы индексы были "зациклены"? Заранее спасибо за ответы. P.S. Если на Pascal.ABС такое сделать не... |
PascalABC.NET Преобразование массива по правилу Здравствуйте, уважаемые форумчане! Возник такой вопрос. Имеется массив из n-го количества элементов. Например, такого вида: A:=. Необходимо сделать так, чтобы эти элементы как бы попеременно складывались друг с другом. Например, берем первый элемент a1 и складываем со всеми остальными. Потом берем второй, и так далее. В итоге получается что-то вроде: P=a1+a2 S=a1+a3 R=a1+a4 F=a2+a3 ......... https://www.cyberforum.ru/ pascalabc-net/ thread664588.html |
10 / 10 / 2
Регистрация: 23.09.2012
Сообщений: 427
|
|
0 | |
Требуется, определяя для каждого числа количество цифр, использовавшихся при его записи, найти и вывести максимальное такое значение - PascalABC.NET - Ответ 352660306.10.2012, 17:52. Показов 1215. Ответов 1
Метки (Все метки)
Дан текстовый файл с именем FileName, в первой строке которого записано единственное число N, а во второй строке последовательность из N целых чисел, разделенных пробелами. Требуется, определяя для каждого числа количество цифр, использовавшихся при его записи, найти и вывести максимальное такое значение. Массивы использовать запрещается, а файл для чтения открывать только один раз.
Вернуться к обсуждению: Требуется, определяя для каждого числа количество цифр, использовавшихся при его записи, найти и вывести максимальное такое значение PascalABC.NET
0
|
06.10.2012, 17:52 | |
Готовые ответы и решения:
1
Дана последовательность n натуральных чисел. Для каждого числа вычислить количество его цифр и сумму этих цифр. Вывести на экран каждое число, количес Для каждого числа последовательности вычислить количество его цифр и сумму этих цифр Для каждого числа вывести новое число, которое получится после записи цифр числа в обратном порядке Для каждого числа последовательности вывести новое число, которое получится после записи цифр числа в обратном порядке |
06.10.2012, 17:52 | |
06.10.2012, 17:52 | |
Помогаю со студенческими работами здесь
0
Для каждого числа последовательности вывести новое число, которое получится после записи цифр числа в обратном порядке дан массив чисел, найти значение функции y=x^3+5 для каждого числа; минимальное и максимальное значение; их сумму. Функция: для каждого числа последовательности определить количество его нечетных цифр Для любого натурального числа напечатать количество цифр в его записи Для каждого элемента последовательности найти среднее значение его цифр Найти все числа, для каждого из которых выполняется условие: кубический корень из числа равен сумме его цифр |
Новые блоги и статьи | |||||
Как проводить научные вычисления на Python
InfoMaster 15.01.2025
Python стал одним из наиболее востребованных языков программирования в области научных вычислений благодаря своей простоте, гибкости и обширной экосистеме специализированных библиотек. Научные. . .
|
Создание игры типа Minecraft на PyGame/Python: пошаговое руководство
InfoMaster 15.01.2025
В данном руководстве мы рассмотрим процесс создания игры в стиле Minecraft с использованием библиотеки PyGame на языке программирования Python. Этот проект идеально подходит как для начинающих. . .
|
Как создать свою первую игру в стиле Doom на Unreal Engine
InfoMaster 15.01.2025
Разработка шутера от первого лица в стиле классического Doom представляет собой увлекательное путешествие в мир игрового программирования, где сочетаются творческий подход и технические навыки. . . .
|
Параллельное программирование: основные технологии и принципы
InfoMaster 15.01.2025
Введение в параллельное программирование
Параллельное программирование представляет собой фундаментальный подход к разработке программного обеспечения, который позволяет одновременно выполнять. . .
|
Как написать микросервис на C# с Kafka, MediatR, Redis и GitLab CI/CD
InfoMaster 15.01.2025
В современной разработке программного обеспечения микросервисная архитектура стала стандартом де-факто для создания масштабируемых и гибких приложений. Этот подход позволяет разделить сложную систему. . .
|
Что такое CQRS и как это реализовать на C# с MediatR
InfoMaster 15.01.2025
Концепция CQRS и её роль в современной разработке
В современном мире разработки программного обеспечения архитектурные паттерны играют ключевую роль в создании масштабируемых и поддерживаемых. . .
|
Как настроить CI/CD с Azure DevOps
InfoMaster 15.01.2025
CI/ CD, или непрерывная интеграция и непрерывное развертывание, представляет собой современный подход к разработке программного обеспечения, который позволяет автоматизировать и оптимизировать процесс. . .
|
Как настроить CI/CD с помощью Jenkins
InfoMaster 15.01.2025
Введение в CI/ CD и Jenkins
В современной разработке программного обеспечения непрерывная интеграция (CI) и непрерывная доставка (CD) стали неотъемлемыми элементами процесса создания качественных. . .
|
Как написать микросервис на Go/Golang с Kafka, REST и GitHub CI/CD
InfoMaster 14.01.2025
Определение микросервиса, преимущества использования Go/ Golang
Микросервис – это архитектурный подход к разработке программного обеспечения, при котором приложение состоит из небольших, независимо. . .
|
Как написать микросервис с нуля на C# с RabbitMQ, CQRS, Swagger и CI/CD
InfoMaster 14.01.2025
В современном мире разработки программного обеспечения микросервисная архитектура стала стандартом де-факто для создания масштабируемых и гибких приложений. Этот архитектурный подход предполагает. . .
|
Как создать интернет-магазин на PHP и JavaScript
InfoMaster 14.01.2025
В современном мире электронная коммерция стала неотъемлемой частью бизнеса. Создание собственного интернет-магазина открывает широкие возможности для предпринимателей, позволяя достичь большей. . .
|
Как написать Тетрис на Ассемблере
InfoMaster 14.01.2025
Тетрис – одна из самых узнаваемых и популярных компьютерных игр, созданная в 1984 году советским программистом Алексеем Пажитновым. За прошедшие десятилетия она завоевала симпатии миллионы людей по. . .
|