Выяснить, есть ли в целочисленном массиве одинаковые элементы, равноудаленные от начала и конца массива - Turbo Pascal - Ответ 3739227

Turbo Pascal

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Turbo Pascal Удаление символа в строке Задача такая: нужно удалить из строки все запятые, которые предшествуют первой точке. есть кое какие соображения по этому поводу. var St,St2:string; i,j,k,m,a:integer; Begin writeln('input... В целом правильно, но для удаления есть же специальная функция ;) Чего себе голову морочить. var St:string; i, k:integer; Begin writeln('input string:'); readln(St); k:=pos('.',St); https://www.cyberforum.ru/ turbo-pascal/ thread705819.html	Turbo Pascal Дан текст. Определите количество слов, начинающихся и оканчивающихся одной и той же буквой Дан текст. Определите количество слов, начинающихся и оканчивающихся одной и той же буквой. помогите найти ошибку... var sl,s:string; i, h:integer; begin writeln('введите строку'); readln(s);... Добавлено через 1 минуту var sl,s:string; i, h:integer; begin writeln('введите строку'); readln(s); h:=0; sl:=''; i:=1; s:=s+'.'; https://www.cyberforum.ru/ turbo-pascal/ thread705669.html
Turbo Pascal Формирование и сортировка матрицы и вектора https://www.cyberforum.ru/ turbo-pascal/ thread705786.html Добрый день! В задаче где-то ошибка, где не пойму. за помощь буду благодарен. Ввести элементы матрицы А(8,8). Сформировать вектор В, элементами которого являются средние арифметические значения... А ошибку не видите,я ее столько искал,замучился уже. И еще вот вопрос, мне нужно процедуру только для сортировки, вот так можно оформить?и почему массив не надо записывать в процедуру, как мы делаем...	Turbo Pascal Сложение длинных чисел https://www.cyberforum.ru/ turbo-pascal/ thread705689.html Мне нужно сложить в паскале длинные числа (до 255 символов в строке). Исходные данные: в двух строках по одному длинному целому десятичному числу Выходные данные: результат сложения этих чисел ... Сложение длинных, введенных как строки есть здесь https://www.cyberforum.ru/pascal/thread234582.html
Распечатать список учеников музыкальной школы,которые учатся играть на скрипке Turbo Pascal Распечатать список учеников музыкальной школы,которые учатся играть на скрипке.Указать также,сколько лет они занимаются музыкой и принимали ли участие в каких либо конкурсах.	Turbo Pascal Записать числа и их цифры в обратном порядке https://www.cyberforum.ru/ turbo-pascal/ thread705663.html Дана задача: Вводится 5 чисел. Требуется записать их в обратном порядке, при этом переставив все цифры в каждом числе в обратном порядке. Моя программа переставляет числа в массиве, но при попытке... вашим способом доделал, спасибо. Попробовал еще без строк и снова ошибка, причем та же var k,l,ss:longint; x:array of longint; x1:array of longint; i,j,m:integer; s,s1:string; begin ...
Turbo Pascal Даны 2 действительных числа a,b. Вывести первое, если оно больше второго и оба числа в противном случае помогите решить задачу на ветвление с программой. Текст таков:Даны 2 действительных числа a,b. Вывести первое, если оно больше второго и оба числа в противном случае. uses crt; var a,b:real; begin clrscr; writeln('Введите 2 действительных числа'); readln(a,b); if a>b then write('a=',a:0:2) else writeln('a=',a:0:2,' b=',b:0:2); readln end.	Turbo Pascal Определить минимальное колличество элементов массива Определить минимальное количество элементов массива А(10), сумма которых больше введенного с клавиатуры k. Очень-очень нужна помощь!:) s:=0; For i:=1 to 10 do Begin s:=s+A; if s>k then break; End; if s>k then writeln('минимальное количество элементов массива сумма которых больше ',k,' = ',i) else writeln('нету такого...
Вывести номер её первой строки матрицы, содержащей максимальное количество одинаковых элементов Turbo Pascal Дана целочисленная матрица размера M x N .Вывести номер её первой строки ,содержащей максимальное количество одинаковых элементов Сейчас сделаю Добавлено через 11 минут var i,j,m,n,k,nom,h,max:integer; c: array of integer; Begin read(m,n); for i:=1 to m do begin readln; h:=0; for j:=1 to n do begin ...	Turbo Pascal Написать программу, которая проверяет находится ли x в пределах отрезков https://www.cyberforum.ru/ turbo-pascal/ thread705737.html Написать программу, которая проверяет находится ли x в рамках отрезков и вне пределов отрезка . Спасибо заранее! Или я не понял задание, или вы ошиблись во втором отрезке. Может, ?
Turbo Pascal Составить таблицу истинности,Высчислить СКНФ и СДНФ uses crt; Var a,b,c: Boolean; function FF(a,b,c: boolean): boolean; var F:boolean; begin F:=(not(a))and(b)and(not(c))or(a)and (not(b))and(c)or(not(a))and(b)and(c); ... https://www.cyberforum.ru/ turbo-pascal/ thread705665.html	Turbo Pascal Из ассортимента конфет,выпускаемой пермской кондитерской фабрикой,выбрать те,стоимость которых от 30 до 55 руб. за 1 кг Из ассортимента конфет,выпускаемой пермской кондитерской фабрикой,выбрать те,стоимость которых от 30 до 55 руб. за 1 кг. Указать срок их годности и номера магазинов, в которых они имеются в продаже.

@Qwer345 0 / 0 / 0 Регистрация: 21.11.2012 Сообщений: 7
		0
	Выяснить, есть ли в целочисленном массиве одинаковые элементы, равноудаленные от начала и конца массива - Turbo Pascal - Ответ 3739227 22.11.2012, 19:20. Показов 1641. Ответов 2 Метки (Все метки) Помогите пожалуйста с задачей=) Выяснить, есть ли в целочисленном массиве одинаковые элементы, равноудаленные от начала и конца массива. При соблюдении следующих условий: Программа должна создавать одномерный массив случайных чисел из 20 элементов величиной от -25 до +25, используя команду randomize Вернуться к обсуждению: Выяснить, есть ли в целочисленном массиве одинаковые элементы, равноудаленные от начала и конца массива Turbo Pascal Следующий ответ 0

Лучшие ответы (1)

Сообщение: #3739312

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

22.11.2012, 19:20

Готовые ответы и решения:

Выяснить, есть ли в целочисленном массиве одинаковые элементы, равноудаленные от начала и конца массива
Выяснить, есть ли в целочисленном массиве одинаковые элементы, равноудаленные от начала и конца массива. При соблюдении следующих...

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

Выяснить, есть ли одинаковые элементы в массиве
Имеется массив А из N произвольных чисел - А(N), среди которых есть положительные, отрицательные и равные нулю. Составить программу,...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

22.11.2012, 19:20

Помогаю со студенческими работами здесь

Выяснить есть ли в двумерном массиве строка содержащие одинаковые элементы
дан двумерный массив A (n * m) выяснить есть ли в нем строка содержащие одинаковые элементы C++

Выяснить, есть ли одинаковые элементы в массиве. Определить их значение и индексы
Выяснить, есть ли одинаковые элементы в массиве. Определить их значение и индексы.

1. выяснить, есть ли в двумерном массиве одинаковые элементы. 2. заполнить массив А размерром MxM
1. Составить программу, выясняющую, есть ли в двумерном массиве размера MxN одинаковые элементы. Вывести соответствующее сообщение на...

Выяснить есть ли в целочисленном массиве простые числа
Просьба написать на уровне СУЗа;) Добавлено через 37 минут Срочно пожалуйста,скоро зачет.

Массив: Найти пары элементов массива B, равноотстоящих от начала и конца массива и имеющих одинаковые значения
Помогите пожалуйста. Найти номера пары элементов массива B, равноотстоящих от начала и конца массива и имеющих одинаковые значения.

Новые блоги и статьи Все статьи Все блоги /
Исследование байт-кода Python: подключаем дизассемблер stackOverflow 19.02.2025 Многие знают, что Python - интерпретируемый язык, но мало кто задумывается о том, что происходит между написанием кода и его выполнением. На самом деле Python использует промежуточное представление. . .	Исследование байт-кода Python: компиляторы против интерпретаторов stackOverflow 19.02.2025 Понимание байт-кода Python - основополагающий аспект для разработчиков, стремящихся глубже понять внутренние механизмы языка и оптимизировать производительность своих программ. Байт-код представляет. . .	Comprehensions в Python - что это такое? stackOverflow 19.02.2025 Когда речь заходит о Python, одной из его самых красивых и мощных возможностей являются списковые включения или comprehensions. Это особые синтаксические конструкции, позволяющие создавать новые. . .	Python правда такой медленный? Развенчиваем миф о медлительности stackOverflow 19.02.2025 Когда речь заходит о выборе языка программирования для нового проекта, вопрос производительности часто становится одним из ключевых факторов. Python, несмотря на свою популярность и простоту. . .	Динамические формы в Flask stackOverflow 19.02.2025 Работа с веб-формами часто требует гибкости в отношении количества полей, которые пользователь может заполнить. Представьте ситуацию, когда вам нужно создать форму для ввода контактных данных, где у. . .
Обнаружение объектов в реальном времени на Raspberry Pi с OpenCV и Movidius NCS stackOverflow 19.02.2025 Технология обнаружения объектов в реальном времени становится все более востребованной в различных областях - от систем безопасности до автономных транспортных средств. Особый интерес представляет. . .	где chromium хранит пароли и как их обнулить в пожарном варианте jigi33 19.02.2025 Where is the chromium browser stores passwords for a sites где chromium-подобный браузер хранит пароли и как их обнулить в пожарном варианте (see screenshot)	howto get access to external internet resources with kinit jigi33 19.02.2025 Решение проблемы с необходимостью доп. авторизации по Керберос для автоотработки аутентификации на прокси-сервер (see screenshot)	Отслеживание автомобилей и определение скорости с OpenCV и Python на Raspberry Pi stackOverflow 19.02.2025 В этой статье мы рассмотрим создание системы отслеживания транспортных средств и определения их скорости с использованием компьютерного зрения и библиотеки OpenCV. Наше решение основано на принципе. . .	ENV (environments) valid paths in linux jigi33 19.02.2025 Environments paths (see screenshot)

Наверх