|
|
Другие темы раздела | |
Pascal Найти число, отличающееся от других чисел
https://www.cyberforum.ru/ pascal/ thread2355257.html var a, b, c, d:integer; begin readln(a, b, c, d); if a=b then if c=a then writeln(d) else if c<>a then writeln(c) else if a<>b then |
Майнкрафтия Pascal Мы попали в Майнкрафтию, в которой все состоит из блоков размером 1 * 1 * 1. Вся страна поделена на одинаковые чанки, по одному Чанка для каждого жителя. Чанк представляет собой параллелепипед размером n * m * k блоков. Автор задачи живет в одном из таких чанков. Некоторые блоки этого Чанка пустые и через них можно пройти, а некоторые заставлены камнем, то есть непроходимыми. Автор сейчас... |
Pascal Найти разность элементов массива
https://www.cyberforum.ru/ pascal/ thread2355147.html Есть такое задание: Программа на Pascal которая заполняет массив из 10 случайных целых чисел на промежутке от -10 до 5 вычисляет разность элементов массива. Правильно я сделал? Диапазон я верно указал? uses crt; var // создаем массив massiv:array of integer; raznost,i:integer; begin clrscr; |
Pascal Для n точек плоскости найти расстояние от начала координат до каждой из них
https://www.cyberforum.ru/ pascal/ thread2355009.html Разработать алгоритм и программу с единственным циклом для обработки одномерных массивов. При заданных координатах X1,X2,...Xn; Y1,Y2,..Yn для n точек плоскости XOY найти Rk от начала координат до каждой из них (координатами k-й точки являются Xk, Yk). |
Pascal Считая т текстовым файлом, ответить на следующие Считая t текстовым файлом, ответить на следующие вопр: а) эквивалентны ли типы text и fail of char; б) Кроме текстовых файлов, какие еще файлы могут делиться на строки? Обязательно ли все строки файла должны быть одинаковой длины? Могут ли в файле быть пустые строки в) Если при записи в t надо закончить строку, то как это сделать? Какие действия влечет за собой выполнение оператора... |
Pascal Определить содержимое файла f, после выполнения следующих операторов:
https://www.cyberforum.ru/ pascal/ thread2354933.html Var f: file of integer; i: integer; Определить содержимое файла f, после выполнения следующих операторов: а) rewrite(f); if eof(f) then write(f,1) else write(f,2); if eof(f) then write(f,3) else write(f,4); б) rewrite(f); for i:=3 downto 1 do write(f,sqr(i)); |
Pascal Найти сумму n первых четных по номеру членов геометрической прогрессии с первым членом b и знаменателем q Найти сумму n первых парных по номеру членов геометрической прогрессии с первым членом b и знаменателем q. Помогите пожалуйста, буду благодарен. https://www.cyberforum.ru/ pascal/ thread2354840.html |
Pascal Заменить каждую первую букву в слове заглавной. Запросить у пользователя строку S, содержащую несколько слов, разделенных символом пробела. Сформировать из нее строку S1, заменив каждую первую букву в слове заглавной. Вывести на чистый экран строки S и S1, рядом их длину. |
Pascal Метод наименьших квадратов (МНК) Здравствуйте, прошу вашей помощи, нужно составить алгоритм решения задачи для аппроксимации точек степенной функцией (полиномом) произвольной степени m. составить программу на языке Pascal, содержащую: ввод исходных точек из файла данных, формирование матрицы Грамма, решение системы линейных алгебраических уравнений методом Гаусса, вывод результатов и проверку. program kvadrat; uses... https://www.cyberforum.ru/ pascal/ thread2354600.html |
Pascal Программа на турбо паскале
https://www.cyberforum.ru/ pascal/ thread2354573.html Ребят, помогите написать программу на турбо паскале. Не разбираюсь в массивах. Желательно уже полностью с началом и с концом |
Массив из больших чисел Pascal Добрый const n = 5;var p: boolean; var a:array of longint; index : integer; {$I-} procedure generate (l,r:integer); var i,v:integer; |
Pascal Напишите программу, вычисляющую функцию 1+x+x^2+x^3.+x^n Подскажите пожалуйста, никак не могу догадаться как сделать такую программу, с помощью цикла for 1+x+x^2+x^3...+x^n https://www.cyberforum.ru/ pascal/ thread2354522.html |
Модератор
9873 / 5241 / 3306
Регистрация: 17.08.2012
Сообщений: 16,011
|
|
30.11.2018, 21:22 | 0 |
Найти отрезки неубывания в N последовательности целых чисел - Pascal - Ответ 1311205230.11.2018, 21:22. Показов 730. Ответов 12
Метки (Все метки)
Ответ
Да, функции, естественно. Зарапортовался.
Вернуться к обсуждению: Найти отрезки неубывания в N последовательности целых чисел Pascal
1
|
30.11.2018, 21:22 | |
Готовые ответы и решения:
12
С клавиатуры вводится N целых чисел a1, a2,….,aN. Найти сумму этих чисел. Найти номер первого четного числа последовательности чисел. Среди заданной последовательности целых чисел найти степени двойки Среди заданной последовательности целых чисел найти нечетные числа кратные трем Найти сумму произведение тех элементов заданной последовательности целых чисел первому четному числу |
30.11.2018, 21:22 | |
30.11.2018, 21:22 | |
Помогаю со студенческими работами здесь
0
Найти максимальное из 4 целых чисел с помощью процедуры для 2 целых чисел. В чем ошибка? Напишите программу, которая в последовательности целых чисел определяет среднее арифметическое положительных чисел напишите программу,которая определяет сумму всех положительных чисел вводимой последовательности из N целых чисел. Найти сумму первых n целых положительных четных целых чисел |