Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Turbo Pascal Строки. Упорядочить по убыванию длин слов строку, в которой минимальное слово https://www.cyberforum.ru/ turbo-pascal/ thread536223.html
Нуждаюсь в вашей помощи!!!!Очень прошу помочь...Нужно написать программу по условиям:Дан текст. Создать новый текст, в котором слова предложений исходного текста, содержащего слово минимальной длины,... Master_13Dan, правильно ли я понимаю, что необходима работа с текстовыми файлами? и еще... если несколько слов минимальной длины в разныъх строках, их тоже упорядочивать?
Turbo Pascal Определите сложность алгоритма вычисления значений функции y=sin(x)
Определите сложность алгоритма вычисления значений функции y=sin(x) для n аргументов. Я не могу понять вообще как её делать подскажите плз
Turbo Pascal Переставить слова в предложении в обратном порядке Задача заключается в следующем: "Переставить слова в каждом предложении в обратном порядке" Есть готовая программа на бэйсике DIM i AS INTEGER, n AS INTEGER, m AS INTEGER, k AS INTEGER, f AS... Не дождался я ответа и все таки сегодня самостоятельно нашел проблему Вот рабочий вариант этой программы на паскале, возможно понадобится кому-нибудь(если нет, то удалите просто тему) var s:array... https://www.cyberforum.ru/ turbo-pascal/ thread536388.html Turbo Pascal Известны данные о количестве осадков, выпавших за каждый день февраля. Найти общее число осадков, выпавших по четным числам месяца https://www.cyberforum.ru/ turbo-pascal/ thread536136.html
11.57. Известны данные о количестве осадков, выпавших за каждый день февраля. Найти общее число осадков, выпавших по четным числам месяца. 12.38. В двумерном массиве хранится информация о баллах,... 12.38. uses crt; const n=20; t=5; var m:array of integer; i,j,s:integer; Begin
Подпрограммы. Даны 2 предложения. В каком из них доля (в%) буквы б больше Turbo Pascal
Даны 2 предложения.В каком из них доля (в%) буквы б больше.(Определить функцию для расчета доли некоторой буквы в предложении.) uses crt; var s1,s2: string; function PrB(c: char; s: string): real; var i,k: byte; begin k:=0; for i:=1 to length(s) do if upcase(s)=upcase(c) then inc(k); PrB:=k*100/length(s);
Turbo Pascal Построить СА определения суммы четных чисел от 2 до n https://www.cyberforum.ru/ turbo-pascal/ thread536290.html
Помогите пожалуйста задачка такого типа: Построить СА определения суммы четных чисел от 2 до n. uses crt; var i,sum,n: integer; begin clrscr; write('n: '); readln(n); for i:=2 to n do if not odd(i) then sum:=sum+i; writeln('sum = ',sum);
Turbo Pascal Известен рост каждого из 25-и учеников класса, определить самый малый и большой рост https://www.cyberforum.ru/ turbo-pascal/ thread536151.html
Известен рост каждого из 25-и учеников класса. Нет ни одной пары учеников, имеющих одинаковый рост. определить фамилии самого высокого и самого низкого учеников класса.
Turbo Pascal Составить блок-схему и программу вычисления значения функции.
Составить блок-схему и программу вычисления значения функции помогите пожалуйста
Turbo Pascal Реализация графических обьектов карандаш, квадрат, эллипс
1. Интерфейс программы имеет позволять пользователю управлять работой "графического редактора":  выбирать элемент построения (линию, квадрат и т.п.);  выбирать цвет элемента и цвет...
Вращение фигуры-паралепипеда Turbo Pascal
помогите пожалуста)! написать програму которая реализирует вращения фигуры в вертикальной плоскости. В качестве фигуры задано параллелепипед. Вращение осуществлять вокруг оси, проходящей через...
Turbo Pascal Когда нужно обнулять счетчик, сумматор или переменную
Укажите ситуация когда нужно обнулять счетчик или сумматор или переменную ? Например если есть такая строка inc(a); или s:=s+1; и если однозначно известно что эти строки выполняются только... может кто-нибудь что-нибудь скажет или нет?
Turbo Pascal Описать комбинированный тип записи, который содержит сведения об оценке студентов группы https://www.cyberforum.ru/ turbo-pascal/ thread536362.html
нужно написать вот такую программу...очень надо помогите Описать комбинированный тип записи, который содержит основные сведения об оценке по предмету студентов группы: фамилия, имя, оценка. Занести...
любитель покушать
 Аватар для Севак
687 / 641 / 248
Регистрация: 25.09.2011
Сообщений: 1,313
02.04.2012, 12:20 0

Вывести положительные элементы массива и их номера - Turbo Pascal - Ответ 2863966

02.04.2012, 12:20. Показов 18605. Ответов 2
Метки (Все метки)

Ответ

Цитата Сообщение от BassHunTEp Посмотреть сообщение
if abs(a[i]) mod 7=0
каким боком это связано с условием? там вроде только положительные и их номера надо вывести

Добавлено через 1 минуту
Цитата Сообщение от BassHunTEp Посмотреть сообщение
что в конце надо как-то правильно вывести чтоль.
Цитата Сообщение от BassHunTEp Посмотреть сообщение
Pascal
1
(a[i],'');
пробела между выводимыми элементами нет, надо было так
Pascal
1
(a[i],' ');
Добавлено через 1 минуту
Цитата Сообщение от BassHunTEp Посмотреть сообщение
вводятся генератором случайных чисел.
Цитата Сообщение от BassHunTEp Посмотреть сообщение
Pascal
1
readln(a[i]);
мне как-то влом например 100 чисел вводить вручную

Вернуться к обсуждению:
Вывести положительные элементы массива и их номера Turbo Pascal
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
02.04.2012, 12:20
Готовые ответы и решения:

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

Вывести положительные элементы массива и их порядковые номера
1) Заполнить одномерный массив из n элементов, так как указано ниже. Размерность массива задать в виде именной константы. Ввести с...

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

2
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
02.04.2012, 12:20
Помогаю со студенческими работами здесь

Вывести элементы массива на промежутке [ a,b ], вычислить количество элементов массива, заменить все положительные элементы
В одномерном массиве, состоящем из n вещественных элементов, – вывести на печать элементы массива, значения которых не принадлежат...

Определить номера строк массива, содержащих только положительные элементы
Добрый вечер,помогите, пожалуйста, исправить ошибку в программе и не знаю как еще условие добавить var Form9: TForm9; D:array of...

Массив: Вывести номера первой и последней строк, содержащих только положительные элементы.
Дана таблица 5x10 заполненная целыми числами. Вывести номера первой и последней строк, содержащих только положительные элементы. Если таких...

Вывести номера первой и последней строк таблицы, содержащих только положительные элементы
Дана таблица 5x10 заполненная целыми числами. Вывести номера первой и последней строк, содержащих только положительные элементы. Если таких...

Определить номера строк массива, содержащих только положительные элементы и найти среди них наименьший
дано задание: Дан двумерный массив размером n*m, заполненный случайными числами из заданного пользователем промежутка. Определить номера...

0
Новые блоги и статьи
Использование кэша 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-фреймворков, предоставляет. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru