Pascal ABC

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

Войти

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

Другие темы раздела
Pascal ABC Найти количество положительных элементов в массивах https://www.cyberforum.ru/ pascalabc/ thread1824087.html 1.Найти количества положительных элементов в массивах А, В, С, а за- тем – их среднее арифметическое. 2.Вычислить среднее арифметическое элементов массива Т(15), удовлетворяющих условию 5<=Т<=15 Составьте программы для них, пожалуйста. В первом Обработка различных массивов с использованием подпрограмм. Во втором Обработка одномерных массивов. Буду очень благодарна	Отсортировать каждый столбец с четным номером по неубыванию Pascal ABC Дана целочисленная прямоугольная матрица размера M*N. Отсортировать каждый столбец с четным номером по неубыванию, а каждый столбец с нечетным номером по невозрастанию.
Pascal ABC Вычислить сумму ряда Подскажите как сделать на Pascal) А то туплю что-то...Прога не так результаты выдает... как понял всё не правильно в корне. https://www.cyberforum.ru/ pascalabc/ thread1823850.html	Pascal ABC Найти номер последнего отрицательного элемента массива Дан массив С(13).Найти номер последнего отрицательного элемента массива. Как раз не могу найти номер последнего отрицательного элемента - правильно не выдает. program _1; const n=13; var c:array of integer; a:array of integer; i,k:integer; begin https://www.cyberforum.ru/ pascalabc/ thread1823696.html
Вывести соответствующую числу последовательность Pascal ABC Последовательность из латинских букв строится следующим образом. На первом шаге она пуста. На каждом последующем шаге последовательность удваивается, после чего к ней слева дописывается очередная буква латинского алфавита (а, b, с, ...). Ниже приведены первые шаги построения последовательности: Шаг 1. пустая последовательность Шаг 2. а Шаг 3. baa Шаг 4. cbaabaa Шаг 5. dcbaabaacbaabaa ...	Pascal ABC Вывести на экран все трехзначные числа, сумма цифр которых равна N https://www.cyberforum.ru/ pascalabc/ thread1823401.html 10. Вывести на экран все трехзначные числа, сумма цифр которых равна N. Пытаться перебирать все трехзначные числа от 100 до 999, затем каким-то образом делением и вычитанием выделять отдельные цифры, искать их сумму, сравнивать с N достаточно сложно. Исходя из того, что трехзначное число состоит из 3 цифр, причем первая изменяется от 1 до 9, а вторая и третья – от 0 до 9. program primer10; ...
Pascal ABC Нахождение основных троек Пифагоровых чисел https://www.cyberforum.ru/ pascalabc/ thread1823389.html Сумма квадратов длин катетов x и y прямоугольного треугольника равна квадрату длины гипотенузы z: x2+y2=z2. Тройка натуральных чисел, удовлетворяющих этому равенству, называется Пифагоровыми числами. Составить программу нахождения основных троек Пифагоровых чисел, используя следующие формулы: x=u*v; где u и v — взаимно простые нечетные натуральные числа и u>v.	Определить количество букв в первой последовательности, также встречающихся и во второй последовательности Pascal ABC Даны две последовательности символов(любых). Как определить количество букв в первой последовательности, также встречающихся и во второй последовательности? P.S. Входные данные только две строки, выходные: вывести на экран число - количество букв первой последовательности, повторяющихся во второй.
Pascal ABC Зашифровать текст, ключом которого является слово Здравствуйте, есть у меня интересная задачка. Нужно зашифровать текст, ключом которого является слово. Поясню: есть латинский алфавит. Есть ключ - слово "shifr". Правила следующие: Для зашифровки производиться сдвиг вправо на количество букв, равное номеру буквы в ключе. Кроме символов алфавита есть также пробел, который стоит перед первой буквой алфавита. Для наглядности покажу как это... https://www.cyberforum.ru/ pascalabc/ thread1823326.html	Pascal ABC Написать программу которая выводит числа кратные членам последовательности a,b https://www.cyberforum.ru/ pascalabc/ thread1823309.html Доброго времени суток. Написать программу которая выводит числа кратные членам последовательности a,b, в последовательности заканчивающаяся нулем. (через while) Спасибо
Pascal ABC Вычислить сумму квадратов чисел, принадлежащие промежутку Всем доброго времени суток! Помогите решить задачу, обязательно через массив. И желательно как можно проще. Задача: Вычислить сумму квадратов чисел, принадлежащие промежутку (A,B] и стоящих на четных местах;Подсчитать количество чисел, не меньших заданного С. Спасибо	Pascal ABC Вычислить сумму квадратов чисел, принадлежащие промежутку Всем доброго времени суток! Помогите решить задачу, обязательно через массив. И желательно как можно проще. Задача: Вычислить сумму квадратов чисел, принадлежащие промежутку (A,B] и стоящих на четных местах;Подсчитать количество чисел, не меньших заданного С. Спасибо https://www.cyberforum.ru/ pascalabc/ thread1823154.html

Puporev

Почетный модератор

64305 / 47602 / 32742

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

Сообщений: 115,181

11.10.2016, 18:10

Вывести на экран номер первой строки матрицы, в которой содержаться только положительные элементы - Pascal ABC - Ответ 9633871

11.10.2016, 18:10. Показов 1978. Ответов 3

Метки (Все метки)

Сообщение было отмечено Памирыч как решение

Решение

Pascal

const m=5;
      n=10;
var a:array[1..m,1..n] of integer;
    i,j,i1,k:byte;
begin
randomize;
writeln('Исходная матрица:');
for i:=1 to m do
 begin
  for j:=1 to n do
   begin
    a[i,j]:=-5+random(50);
    write(a[i,j]:4);
   end;
  writeln;
 end;
i1:=0;
i:=1;
while(i<=m)and(i1=0) do
 begin
  k:=0;
  j:=1;
  while(j<=n)and(k=0) do
  if a[i,j]<=0 then k:=1
  else inc(j);
  if k=0 then i1:=i
  else inc(i);
 end;
write(i1);
end.

Вернуться к обсуждению:
Вывести на экран номер первой строки матрицы, в которой содержаться только положительные элементы Pascal ABC

Следующий ответ

Заказать работу у эксперта

Programming

Эксперт

39485 / 9562 / 3019

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

Сообщений: 41,671

Блог

11.10.2016, 18:10

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

Найти и вывести номер первой строки, в которой все элементы равны нулю
1. С клавиатуры вводится матрица вещественных чисел размером N строк на M столбцов. N не...

дан двумерный массив. вывести на экран минимальный номер строки, в котором все элементы положительные.
Здравствуйте! Помогите, пожалуйста с решением задачи. Пожалуйста..... дан двумерный массив. вывести...

Вывести номер строки матрицы NxN, в которой все элементы упорядочены по убыванию
Вывести номер строки матрицы NxN, в которой все элементы упорядочены по убыванию.

Найти номер первой строки матрицы, в которой произведение всех её элементов положительно
Дана вещественная матрица А(10,13). Найти номер первой строки, в которой произведение всех её...

	11.10.2016, 18:10

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

inter-admin

Эксперт

29715 / 6470 / 2152

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

Сообщений: 28,500

Блог

11.10.2016, 18:10

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

Вывести на экран номер первой компоненты, значение которой меньше 210400, но больше 100000, если файл существует
Если на диске А в каталоге VVV имеется файл 'R5.INC',то вывести на экран номер первой компоненты,...

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

Вывести на экран номер строки, в которой число положительных и отрицательных элементов равно
Дан двумерный массив A . Вывести на экран номер строки, в которой число положительных и...

Двумерные массивы - Вывести номер первой последней строки, столбца матрицы
Помогите решить пожалуйста 2. Дана целочисленная матрица размера*M*x*N. Вывести номер ее первой...

Новые блоги и статьи
Объекты и их имена hw_wired 28.01.2025 Введение: Основы объектного подхода и их роль в информатике В современном мире информационных технологий объектный подход стал фундаментальным принципом организации и обработки информации. Этот. . .	Элементы алгоритмизации hw_wired 28.01.2025 Основы алгоритмизации В современном мире алгоритмы играют фундаментальную роль в развитии информационных технологий и программирования. Понимание основ алгоритмизации является ключевым элементом в. . .	Человек и информация hw_wired 28.01.2025 Введение: роль информации в познании мира В современном мире информация играет фундаментальную роль в процессе познания окружающей действительности. Она представляет собой совокупность сведений об. . .	Компьютер и информация hw_wired 28.01.2025 Эволюция вычислительных машин История развития вычислительной техники начинается задолго до появления первых электронных устройств. Человечество всегда стремилось упростить процесс вычислений и. . .	Информационные технологии hw_wired 28.01.2025 Введение в современные технологии работы с информацией В современном мире информационные технологии стали неотъемлемой частью практически всех сфер человеческой деятельности. Они существенно. . .	Информация вокруг нас hw_wired 28.01.2025 Основные понятия информации В современном мире понятие информации является фундаментальным и охватывает практически все сферы человеческой деятельности. Информация представляет собой совокупность. . .
Компьютер для начинающих hw_wired 28.01.2025 Введение в мир компьютерных технологий В современном мире информация стала одним из важнейших ресурсов человечества, определяющим развитие общества и технологий. Наша жизнь неразрывно связана с. . .	[golang] 189. Rotate Array alhaos 28.01.2025 Повороты рукоятки, целочисленный слайс нужно сдвинуть на целое положительное число. Мне очень нравится решение на GO / / https:/ / leetcode. com/ studyplan/ top-interview-150/ package topInterview . . .	КуМир: решение задач на матрицы bytestream 28.01.2025 КуМир представляет собой среду для обучения программированию, которая включает в себя мощные инструменты для работы с матрицами. Матрица в программировании - это двумерный массив, состоящий из. . .	КуМир: решение задач на строки bytestream 28.01.2025 В системе программирования КуМир работа со строковыми данными является одним из важнейших аспектов создания программ. Строки представляют собой последовательности символов, заключенные в кавычки,. . .	КуМир: решение геометрических задач bytestream 28.01.2025 Программирование геометрических задач в среде КуМир становится всё более актуальным в обучении школьников и студентов. КуМир — это разработанная в России обучающая программная среда, предназначенная. . .	КуМир, исполнитель Водолей: Задачи и решения bytestream 28.01.2025 КуМир — это образовательная среда для обучения программированию. Она предлагает пользователям разнообразные инструменты для разработки и отладки программ, что особенно ценно для студентов и. . .

Наверх