С Новым годом! Форум программистов, компьютерный форум, киберфорум
Free Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.64/11: Рейтинг темы: голосов - 11, средняя оценка - 4.64
53 / 0 / 2
Регистрация: 11.01.2014
Сообщений: 25
1

Определить и вывести количество членов последовательности: являющихся удвоенными нечетными числами

11.01.2014, 15:56. Показов 2060. Ответов 11
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Даны n натуральных чисел a1,a2,...,an . Определить и вывести количество членов последовательности:являющихся удвоенными нечетными числами;
Помогите пожалуйста,кто разбирается и кому не сложно.
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
11.01.2014, 15:56
Ответы с готовыми решениями:

Определить количество членов последовательности, являющихся нечётными числами, кратных 3 и некратных 5
Список задач 1. Даны натуральные числа n, A1, ..., An. Определить количество членов Ak...

Найти члены последовательности, являющиеся удвоенными нечетными числами
6. Даны натуральные числа n, a1,…,an, где n≤1500. Найти члены ak последовательности a1,…,an,...

Определить количество членов последовательности, аn являющихся квадратами четных чисел
program pr1_9; uses crt; var mas: array of integer ; n,i,j,k: integer; begin clrscr; ...

Даны n натуральных чисел a1, a2,.,an. Определить и вывести количество членов последовательности
Даны n натуральных чисел a1, a2,...,an. Определить и вывести количество членов последовательности:

11
228 / 225 / 220
Регистрация: 03.07.2012
Сообщений: 466
11.01.2014, 16:56 2
Как-то задание не очень понятно - удвоенный нечётный. Если удвоенный значит уже чётный.
0
53 / 0 / 2
Регистрация: 11.01.2014
Сообщений: 25
11.01.2014, 17:09  [ТС] 3
7) являющихся удвоенными нечетными числами; Я не знаю,может опечатка, а может и задание такое, сама не понимаю эти задачи, первые лабараторные,что нам задавали еще понимала, а тут даже мальчишки с группы не в силах помочь!
0
228 / 225 / 220
Регистрация: 03.07.2012
Сообщений: 466
11.01.2014, 17:18 4
Если число удвоенное, т. е. умноженное на два, то оно не может быть нечётным, оно по определению чётное. Видимо ошибка в условии или я его не правильно понял.
0
53 / 0 / 2
Регистрация: 11.01.2014
Сообщений: 25
11.01.2014, 17:34  [ТС] 5
Определить и вывести количество членов последовательности:являющихся удвоенными нечетными числами;
Скорее всего вывести нечётные удовенные а четные удвоенные не выводить, может так? Или я уже путать начала?
0
228 / 225 / 220
Регистрация: 03.07.2012
Сообщений: 466
11.01.2014, 17:48 6
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
uses
  crt;
const Nmax = 50;  
var n, i, j : byte;
    a : array[1..Nmax] of integer;
    b : integer;    
begin
  repeat
   write('n = '); readln(n);
  until n<=Nmax;
  for i := 1 to n do begin
   write('a',i,' = ');
   readln(a[i]);
  end;
  writeln('Последовательность : '); 
  for i := 1 to n do write(a[i]:4);  
  writeln; 
  j := 0;
  for i := 2 to n do begin
    If (a[i-1] mod 2 = 1) and (2*a[i-1] = a[i]) then begin
    write(a[i]:4);
    inc(j);
    end;    
  end;
  writeln;  
  writeln('Количество элементов удвоенных нечётными числами ',j);   
end.
1
53 / 0 / 2
Регистрация: 11.01.2014
Сообщений: 25
11.01.2014, 17:57  [ТС] 7
Спасибо большое))
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
33006 / 21309 / 8183
Регистрация: 22.10.2011
Сообщений: 36,614
Записей в блоге: 8
11.01.2014, 18:34 8
Цитата Сообщение от Торович Посмотреть сообщение
Pascal
1
If (a[i-1] mod 2 = 1) and (2*a[i-1] = a[i]) then begin
Это зачем? Чтобы проверить, является ли член последовательности удвоенным нечетным, достаточно написать:
Pascal
1
if a[i] mod 4 <> 0 then
2
53 / 0 / 2
Регистрация: 11.01.2014
Сообщений: 25
11.01.2014, 18:41  [ТС] 9
Всё спасибо, всё работает исправно)))Обоим спасибки поставлю за помощь)
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
33006 / 21309 / 8183
Регистрация: 22.10.2011
Сообщений: 36,614
Записей в блоге: 8
11.01.2014, 18:43 10
Например: n=6 все "а" =4
Последовательность :
4 4 4 4 4 4

Количество элементов удвоенных нечётными числами 0
Ответ выдаёт 0 всегад при любых числах будь то четные все или все нечетные, так и долэжно быть?)
Да, потому что все четверки - это удвоенные двойки, а двойки являются четными числами.

Последовательность
6 4 14 24 15
Выдаст уже не 0, а 2, поскольку 6 = 2*3, а тройка - нечетная, и 14 = 2*7, и семерка тоже нечетная...
0
53 / 0 / 2
Регистрация: 11.01.2014
Сообщений: 25
11.01.2014, 18:48  [ТС] 11
Хорошо,запомню,как преподу завтра вписывать числа)))
0
228 / 225 / 220
Регистрация: 03.07.2012
Сообщений: 466
12.01.2014, 04:52 12
Да намудрил я тут, задание не верно понял.
Цитата Сообщение от UI Посмотреть сообщение
if a[i] mod 4 <> 0 then
наверное этого не достаточно, нужно ещё на чётность проверять
Pascal
1
 If (a[i] mod 2 = 0) and (a[i] mod 4 <> 0) then
0
12.01.2014, 04:52
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
12.01.2014, 04:52
Помогаю со студенческими работами здесь

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

Определить количество ak последовательности a1, a2,...,an являющихся квадратами четных чисел.
3. Даны натуральные числа n, a1, a2,...an. Определить количество ak последовательности a1,...

Количество членов последовательности с нечетными порядковыми номерами, кратных 3 и не кратных 5
естественно кому не в напряг 1. Даны натуральные числа п, а1 ..., an. Определить количество...

Определить количество членов последовательности
Доброе время суток) Помогите решить...


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

Или воспользуйтесь поиском по форуму:
12
Ответ Создать тему
Новые блоги и статьи
Что такое Null Pointer Exception (NPE) и как это исправить?
InfoMaster 08.01.2025
Null Pointer Exception (NPE) - это одно из самых распространенных исключений в Java, которое возникает при попытке использовать ссылку на объект, значение которой равно null. Это исключение относится. . .
Русский язык в консоли C++
InfoMaster 08.01.2025
При разработке программ на C++ одной из частых проблем, с которой сталкиваются русскоязычные программисты, является корректное отображение кириллицы в консольных приложениях. Эта проблема особенно. . .
Telegram бот на C#
InfoMaster 08.01.2025
Разработка ботов для Telegram стала неотъемлемой частью современной экосистемы мессенджеров. C# предоставляет мощный и удобный инструментарий для создания разнообразных ботов, от простых. . .
Использование GraphQL в Go (Golang)
InfoMaster 08.01.2025
Go (Golang) является одним из наиболее популярных языков программирования, используемых для создания высокопроизводительных серверных приложений. Его архитектурные особенности и встроенные. . .
Что лучше использовать при создании класса в Java: сеттеры или конструктор?
Alexander-7 08.01.2025
Вопрос подробнее: На вопрос: «Когда одновременно создаются конструктор и сеттеры в классе – это нормально?» куратор уточнил: «Ваш класс может вообще не иметь сеттеров, а только конструктор и геттеры. . .
Как работать с GraphQL на TypeScript
InfoMaster 08.01.2025
Введение в GraphQL и TypeScript В современной разработке веб-приложений GraphQL стал мощным инструментом для создания гибких и эффективных API. В сочетании с TypeScript, эта технология. . .
Счётчик на базе сумматоров + регистров и генератора сигналов согласования.
Hrethgir 07.01.2025
Создан с целью проверки скорости асинхронной логики: ранее описанного сумматора и предополагаемых fast регистров. Регистры созданы на базе ранее описанного, предполагаемого fast триггера. То-есть. . .
Как перейти с 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, что может быть полезно как для начинающих, так и для опытных программистов. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru