Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal Вычисление произведения (подпрограмма) https://www.cyberforum.ru/ pascal/ thread191239.html
Написать рекурсивную подпрограмму, которая вычисляет произведение P(n)=1 * 4 * 7 * ... * (3n-2). Заранее благодарю!
Нахождение произведение четных элементов каждой строки массива Pascal
Нахождение произведение четных элементов каждой строки массива mХn; йа впринципе сделал... только хотелось бы узнать правильной код до конца изложенный т.к. не хочется позора ))))
Pascal Вычисление суммы (с подпрограммой) https://www.cyberforum.ru/ pascal/ thread191209.html
Напишите рекурсивную подпрограмму, которая вычисляет сумму S(n)=1 + 3 + 5 + ... + (2n-1). Заранее благодарю.
Pascal Числа Фибоначчи Здравствуйте! Помогите, пожалуйста, кто может, с задачей Вывести числа Фибоначчи в заданном диапазоне номеров. Обеспечить возможно больший диапазон чисел. Обеспечить просмотр результатов. Вычислить величину "золотого сечения" с заданным количеством точных значащих разрядов. https://www.cyberforum.ru/ pascal/ thread191190.html
Pascal Найти порядковый номер элемента, который наиболее близок по значению к среднему арифметическому значению положительных элементов данного массива.
Найти порядковый номер элемента, который наиболее близок по значению к среднему арифметическому значению положительных элементов данного массива. ребят пожалуйста помогите нужно очень срочно
Pascal Программирование разветвляющихся процессов Определить лежит ли точка с координатами (X,Y) вне круга радиуса R с центром в точке (А,В) или внутри него. https://www.cyberforum.ru/ pascal/ thread191182.html
Pascal Оператор цикла с предусловием https://www.cyberforum.ru/ pascal/ thread191181.html
В последовательности чисел сравнить, что больше сум- ма положительных или произведение отрицательных.
Обработка одномерных массивов. ввод с клавиатуры Pascal
Дан массив целых чисел a1,...,an. Найти количество и сумму тех членов массива а1,..,аn,которые делятся на 5 и не делятся на 7.
Pascal Матрицы большой размерности Матрицы большой размерности бывает выгодно хранить в куче. Один из вариантов такого хранения – список, состоящий из записей, одним из полей которых является указатель, а информационным полем – массив (строка исходной матрицы). Составить программу, которая обеспечит заполнение подобной структуры и перемножение двух матриц. Результат хранить в такой же динамической структуре. помогите кто... https://www.cyberforum.ru/ pascal/ thread191174.html Pascal сумму и среднее арифметическое последовательности https://www.cyberforum.ru/ pascal/ thread191171.html
Помогите написать программу вычисляющую сумму и среднее арифметическое последовательности К положительных чисел, которые вводятся с клавиатуры а также: Составить программу, в которой среди двухзначных чисел печатаются те числа, которые равны сумме своих цифр.
Pascal Даны два числа.Определить равны они или нет
Помогите, пожалуйста, написать задачи в Паскале 1)Даны два числа.Определить равны они или нет. 2)Даны стороны треугольника.Определить равны они или нет. 3)Дана последовательность из десяти чисел. Найти сумму чисел меньших 5 4) Дана последовательность из десяти чисел.Найти их сумму.
Pascal Ввести натуральное число N https://www.cyberforum.ru/ pascal/ thread191165.html
Ввести натуральное число N. Получить и выдать на печать сумму тех чисел вида i(в кубе)-3*i*N(в квадрате)+N (i=1,2,3...N),которые являются нечетными.
ЧакЭ одобряЭ
285 / 284 / 86
Регистрация: 27.12.2009
Сообщений: 1,767
14.11.2010, 20:14 0

Подсчет числа четных цифр, используемых в записи N-значного числа M - Pascal - Ответ 1110528

14.11.2010, 20:14. Показов 1908. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено Пушистый колбас как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
function cs(n: integer): integer;
var
  k, c: integer;
begin
  k := 0;
  c := 0;
  while (n > 0) do 
  begin
    k := n mod 10;
    if (k mod 2 = 0) then
      inc(c);
    n := n div 10;
  end;
  cs := c;
end;


Вернуться к обсуждению:
Подсчет числа четных цифр, используемых в записи N-значного числа M Pascal
1
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
14.11.2010, 20:14
Готовые ответы и решения:

Составьте программу подсчета числа четных цифр, используемых в записи н-значного числа M
Составьте программу подсчета числа четных цифр, используемых в записи N-значного числа M

Процедуры и функции. Напишите программу подсчета числа четных цифр, используемых в записи N-значного числа M
Напишите программу подсчета числа четных цифр, используемых в записи N-значного числа M.

Написать программу подсчета числа четных цифр , используемых в записи N-значного числа.помоги те решить с использованием фукций
Написать программу подсчета числа четных цифр , используемых в записи N-значного числа.помоги те...

Подпрограммы. Подсчитать число четных цифр, используемых в записи N-значного числа M
Напишите программу подсчета числа четных цифр, используемых в записи N-значного числа M.

1
14.11.2010, 20:14
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
14.11.2010, 20:14
Помогаю со студенческими работами здесь

Подсчет числа четных цифр, используемых в написании N-значного числа М (функции)
Добрый день. помогите решить задачку пжалуйста. Заранее благодарен

Подсчет суммы цифр n-значного числа
Здравствуйте.Помогите написать в Lazarus программу,которая считала бы сумму цифр n-значного числа.

дано натуральное число N. Определить,во сколько раз произведение цифр числа больше суммы цифр.Найти количество чётных цифр в записи числа!!
дано натуральное число N. Определить,во сколько раз произведение цифр числа больше суммы цифр.Найти...

определить символ код который в 4 раза больше суммы четных цифр заданного целого 4-х значного числа
Помогите пожалуста!) определить символ код который в 4 раза больше суммы четных цифр заданного...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru