![]() |
|
Другие темы раздела | |
Pascal Вывести их, поменяв местами первый минимальный и последний максимальный элемент.
https://www.cyberforum.ru/ pascal/ thread175210.html Дано N(1<=N<=1000) и N целых чисел. Вывести их, поменяв местами первый минимальный и последний максимальный элемент. Пример: 2 1 3 3 1 2 ->2 3 3 1 1 2 Добавлено через 12 минут ОЧЕНЬ НАДО PROGRAM Swap; USES Crt; VAR A: ARRAY OF INTEGER; i, min, max, imin, imax, n: INTEGER; BEGIN WRITE('n='); READLN(n); Randomize; FOR i := 1 TO n |
Pascal Написать функцию напишите полностью прогу зарание спасибо!!!! Написать функцию нахождения наибольший общий делителя двух натуральных чисел. https://www.cyberforum.ru/ pascal/ thread175131.html |
Pascal Найти количество различных цифр в десятичной записи числа. Дано N(1<=N<=10^9). Найти количество различных цифр в десятичной записи числа. Количество сравнений во время исполнения программы не должно превышать 10. Добавлено через 46 минут ПАМАГИТЕ ... SKeLeToN, подсказка: делай с помощью множеств. https://www.cyberforum.ru/ pascal/ thread175164.html |
Оператор Case Pascal Подскажите как прогу сделать вот задание: Разработать программу, которая выводит на экран название ансамбля из некоторого числа исполнителей. Введите номер ансамбля 2 чел дуэт 3 чел трио 4... Uses CRT; var i:integer; begin write('Ââåäèòå êîë-âî ÷åëîâåê: '); readln(i); case i of 2:writeln(i,' ÷åëîâåêà: äóýò'); 3:writeln(i,' ÷åëîâåêà: òðèî'); |
Pascal Дано целое число N (> 1). Найти наибольшее целое число K, при котором выполняется неравенство 3K < N.
https://www.cyberforum.ru/ pascal/ thread175163.html Дано целое число N (> 1). Найти наибольшее целое число K, при котором выполняется неравенство {3}^{k} < N. как возвести в степень, и как решить задачу при помощи цикла while? //Объявление типа переменной var k, n:integer; begin Writeln('Введите натуральное число N'); k:=0; // Ввод переменной Read(n); |
Pascal Дано целое число N и набор из N целых чисел, содержащий по крайней мере два нуля Дано целое число N и набор из N целых чисел, содержащий по крайней мере два нуля. Вывести сумму чисел из данного набора, расположенных между последними двумя нулями (если последние нули идут подряд,... https://www.cyberforum.ru/ pascal/ thread175158.html |
удвоение гласных Pascal Помогите пожалуйста!!! Дан текст сформировать новый текст ,удвоив все гласные буквы латинского языка. Например:Pascal -Paascaal PROGRAM Double; USES Crt; CONST Alphabet: ARRAY of CHAR = ('A', 'E', 'I', 'O', 'U', 'Y', 'a', 'e', 'i', 'o', 'u', 'y'); VAR S: STRING; i, j: INTEGER; BEGIN READLN(S); FOR i := 1... |
Pascal Уменьшить её, удалив первый из отрицательных и минимальный из положительных(такой элемент одын) и сдвигнут все остальные к началу
https://www.cyberforum.ru/ pascal/ thread175175.html Дана последовательность из n элементов. Уменьшить её, удалив первый из отрицательных и минимальный из положительных(такой элемент одын) и сдвигнут все остальные к началу. Люди Добрые помогите... |
Дан массив размера N. Найти номера тех элементов массива, которые больше своего левого соседа, и их количество Pascal Дан массив размера N. Найти номера тех элементов массива, которые больше своего левого соседа, и количество таких элементов. Найденные номера выводить в порядке их убывания. что не так? program... Можете перевести это в C#? |
Pascal сумма ряда, табуляция
https://www.cyberforum.ru/ pascal/ thread175176.html Здраствуйте,прошу помочь решить задачу... Вычислить и вывести на экран в виде таблицы значения функции, заданной с помощью ряда Тейлора, на интервале от Хнач до Хкон с шагом dx с точностью... uses crt; var xn,xk,e,dx,s,si,t:real; i:integer; begin clrscr; write('Введите начало интервала xn='); readln(xn); repeat write('Конец интервала интервала xk>',xn:0:2,' xk='); readln(xk); |
Pascal рассчитать значения функции... рассчитать значения функции y = ( ( 3 х ^ 2 ) - 6 ) ) / (2х), запросив у пользователя интервал и шаг изменения аргумента функции.Результаты рассчета вывести на экран в виде таблицы.Построить график... Вот сделать отдельно эти дела, нет проблем, но вместе не очень. Функция капризная, прерывистая, поэтому рисовать ее на любом интервале не очень хорошо, ее нужно рисовать например на интервале если ... https://www.cyberforum.ru/ pascal/ thread175190.html |
Pascal Массив Всем привет!!! Помогите разработать программу для вычисления суммы квадратов положительных элементов одномерного массива размерностю 10, введенного с клавиатуры пользователем???? Зарание... program prog; const N = 10; var arr: array of integer; i: integer; sum: integer; begin sum:= 0; |
Почетный модератор
![]() 64305 / 47602 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
|
||||||
11.10.2010, 22:04 | 0 | |||||
разработать программу для вычисления суммы положительных чисел - Pascal - Ответ 102063811.10.2010, 22:04. Показов 2321. Ответов 1
Метки (Все метки)
![]() Решение
Вернуться к обсуждению: разработать программу для вычисления суммы положительных чисел Pascal
0
|
11.10.2010, 22:04 | |
Готовые ответы и решения:
1
Составить Алгоритм для вычисления суммы первых n целых положительных четных чисел Составить программу для вычисления суммы квадратов натуральных чисел от 1 до n |
11.10.2010, 22:04 | |
Помогаю со студенческими работами здесь
0
Составить программу вычисления суммы простых чисел , лежащих в интервале (Т;2Т-1) , Т>2. Составьте программу вычисления суммы квадратов простых чисел,лежащих в интервале (M,N) Процедуры. Написать программу вычисления суммы факториалов всех нечетных чисел от 1 до 9.
|
Новые блоги и статьи
![]() |
||||
Использование кэша Laravel - полный гайд
bytestream 18.02.2025
Кэширование - один из наиболее эффективных способов повышения производительности веб-приложений. В современном мире, где скорость загрузки страниц напрямую влияет на удержание пользователей и. . .
|
Создаем REST API в Laravel с аутентификацией и Passport
bytestream 18.02.2025
Разработка современных веб-приложений все чаще требует создания надежного и хорошо структурированного API. REST API стал стандартом де-факто для построения взаимодействия между клиентской и серверной. . .
|
Пайплайны в Laravel - полный гайд
bytestream 18.02.2025
Разработка современных веб-приложений часто требует обработки сложных процессов, состоящих из множества последовательных шагов. Например, при создании системы комментариев может потребоваться. . .
|
Как правильно использовать @required в Symfony
bytestream 18.02.2025
При разработке приложений на Symfony мы часто сталкиваемся с необходимостью внедрения зависимостей. Фреймворк предоставляет несколько способов управления этим процессом, и одним из таких инструментов. . .
|
Система безопасности в Laravel: возможности и примеры
Wired 18.02.2025
Каждый день появляются новые виды атак и уязвимостей, которые могут поставить под угрозу конфиденциальные данные пользователей и функционирование всей системы. В этом контексте выбор надежного. . .
|
Давайте сравним Django и Laravel
Wired 18.02.2025
Django и Laravel - два мощных инструмента, которые часто сравнивают между собой. Оба фреймворка предлагают разработчикам богатый набор возможностей для создания масштабируемых веб-приложений, но. . .
|
Laravel или React - что лучше?
Wired 18.02.2025
В разработке веб выбор правильного инструмента часто определяет успех всего проекта. Особенно интересным представляется сравнение Laravel и React - двух популярных технологий, которые часто. . .
|
Laravel 11: новые возможности, гайд по обновлению
Wired 18.02.2025
Laravel 11 - это новая масштабная версия одного из самых популярных PHP-фреймворков, выпущенная в марте 2024 года. Эта версия продолжает традицию внедрения передовых технологий и методологий. . .
|
Миграции в Laravel
Wired 18.02.2025
Разработка веб-приложений на Laravel неразрывно связана с управлением структурой базы данных. При работе над проектом часто возникает необходимость вносить изменения в схему базы данных - добавлять. . .
|
Аутентификация в Laravel
Wired 18.02.2025
В современном мире веб-разработки безопасность пользовательских данных становится критически важным аспектом любого приложения. Laravel, как один из самых популярных PHP-фреймворков, предоставляет. . .
|