С Новым годом! Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.88/8: Рейтинг темы: голосов - 8, средняя оценка - 4.88
1 / 1 / 0
Регистрация: 04.04.2012
Сообщений: 14
1

В последовательности из N произвольных чисел подсчитать количество нулей

04.04.2012, 20:29. Показов 1570. Ответов 3
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
В последовательности из N произвольных чисел подсчитать количество нулей.

Заданы массивы вещественных чисел X и Y. Сформировать массив Z из положи-тельных элементов массивов X и Y. Определить номера максимального и мини-мального элементов в массиве Z.
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
04.04.2012, 20:29
Ответы с готовыми решениями:

В последовательности из n произвольных чисел подсчитать количество нулей
Никак не составить правильно программу уже 3 часа мучаюсь. Помогите пожалуйста найти ошибку....

Подсчитать количество положительных и отрицательных чисел и количество нулей в массиве
1)Имеется массив А из N произвольных чисел - А(N), среди которых есть положительные, отрицательные...

Определите количество чисел в наиболее длинной последовательности из подряд идущих нулей
Дана последовательность из n целых чисел. Определите количество чисел в наиболее длинной...

Определить количество чисел в наиболее длинной последовательности из подряд следующих нулей
Дана последовательность из 100 целых чисел. Определить количество чисел в наиболее длинной...

3
17 / 17 / 13
Регистрация: 31.03.2012
Сообщений: 86
04.04.2012, 21:28 2
последовательность задана строкой???или как?
0
1 / 1 / 0
Регистрация: 04.04.2012
Сообщений: 14
04.04.2012, 21:34  [ТС] 3
Цитата Сообщение от tyrok Посмотреть сообщение
последовательность задана строкой???или как?
строкой
0
17 / 17 / 13
Регистрация: 31.03.2012
Сообщений: 86
04.04.2012, 22:17 4
пока вторая:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
const N=3;
var X,Y:array[1..N] of real;Z:array[1..2*N] of real;max,min:real;m,p,i,j,k:integer;
Begin
for i:=1 to N do Begin
Read(X[i],Y[i]);Readln;end;
k:=0;
for i:=1 to N do Begin
if X[i]>0 then Begin inc(k);Z[k]:=X[i];end;
if Y[i]>0 then Begin inc(k);Z[k]:=Y[i];end;end;
max:=Z[1];min:=Z[1];m:=1;p:=1;
for i:=2 to k do Begin
if Z[i]>max then m:=i;
if Z[i]<min then p:=i;end;
for i:=1 to k do
Write(Z[i],' ');
Writeln('nomer max=',m,' ','nomer min=',p);end.
Добавлено через 25 минут
а вот и первая:
Pascal
1
2
3
4
5
6
7
var N,k,i:integer;S:string;
Begin Read(N);
Read(S);k:=0;
for i:=1 to N do
if S[i]='0' then inc(k);
if S[N]='0' then Writeln(k+1)
          else Writeln(k);end.
0
04.04.2012, 22:17
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
04.04.2012, 22:17
Помогаю со студенческими работами здесь

Определить количество чисел в наиболее длинной последовательности из подряд идущих нулей
Данная последовательность из 100 целых чисел. Определить количество чисел в наиболее длинной...

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

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

Для каждого члена последовательности из натуральных чисел найти количество нулей и единиц в записи числа
Поступает последовательность целых положительных чисел, 0 — конец последовательности. Для каждого...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Блоги программистов
Как перейти с Options API на Composition API в Vue.js
BasicMan 06.01.2025
Почему переход на Composition API актуален В мире современной веб-разработки фреймворк Vue. js продолжает эволюционировать, предлагая разработчикам все более совершенные инструменты для создания. . .
Архитектура современных процессоров
inter-admin 06.01.2025
Процессор (центральный процессор, ЦП) является основным вычислительным устройством компьютера, которое выполняет обработку данных и управляет работой всех остальных компонентов системы. Архитектура. . .
История создания реляционной модели баз данных, правила Кодда
Programming 06.01.2025
Предпосылки создания реляционной модели В конце 1960-х годов компьютерная индустрия столкнулась с серьезными проблемами в области управления данными. Существовавшие на тот момент модели данных -. . .
Полезные поделки на Arduino, которые можно сделать самому
raxper 06.01.2025
Arduino как платформа для творчества Arduino представляет собой удивительную платформу для технического творчества, которая открывает безграничные возможности для создания уникальных проектов. Эта. . .
Подборка решений задач на Python
IT_Exp 06.01.2025
Целью данной подборки является предоставление возможности ознакомиться с различными задачами и их решениями на Python, что может быть полезно как для начинающих, так и для опытных программистов. . . .
С чего начать программировать микроконтроллер­­ы
raxper 06.01.2025
Введение в мир микроконтроллеров Микроконтроллеры стали неотъемлемой частью современного мира, окружая нас повсюду: от простых бытовых приборов до сложных промышленных систем. Эти маленькие. . .
Из чего собрать игровой компьютер
inter-admin 06.01.2025
Сборка игрового компьютера требует особого внимания к выбору комплектующих и их совместимости. Правильно собранный игровой ПК не только обеспечивает комфортный геймплей в современных играх, но и. . .
Обновление сайта www.historian.b­y
Reglage 05.01.2025
Обещал подвести итоги 2024 года для сайта. Однако начну с того, что изменилось за неделю. Добавил краткий урок по последовательности действий при анализе вредоносных файлов и значительно улучшил урок. . .
Как использовать GraphQL в C# с HotChocolate
Programming 05.01.2025
GraphQL — это современный подход к разработке API, который позволяет клиентам запрашивать только те данные, которые им необходимы. Это делает взаимодействие с API более гибким и эффективным по. . .
Модель полного двоичного сумматора с помощью логических операций (python)
AlexSky-coder 04.01.2025
def binSum(x:list, y:list): s=^y] p=x and y for i in range(1,len(x)): s. append((x^y)^p) p=(x and y)or(p and (x or y)) return s x=list() y=list()
Это мы не проходили, это нам не задавали...(аси­­­­­­­­­­­­­­­­­­­­­­­­­­х­р­о­н­­н­­­ы­­й счётчик с управляющим сигналом зад
Hrethgir 04.01.2025
Асинхронный счётчик на сумматорах (шестиразрядный по числу диодов на плате, но наверное разрядов будет больше - восемь или шестнадцать, а диоды на старшие), так как триггеры прошли тестирование и. . .
Руководство по созданию бота для Телеграм на Python
IT_Exp 04.01.2025
Боты для Телеграм представляют собой автоматизированные программы, которые выполняют различные задачи, взаимодействуя с пользователями через интерфейс мессенджера. В данной статье мы рассмотрим,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru