Четные числа - Pascal - Киберфорум

Pascal (Паскаль)

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

Войти

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

Рейтинг 4.71/7:

@pR12 0 / 0 / 0 Регистрация: 15.03.2010 Сообщений: 3

	Четные числа 11.04.2010, 14:13. Показов 1444. Ответов 2 Метки нет (Все метки) Даны 20 чисел, посчитать сколько из них четных 0

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

Лучшие ответы (1)

Сообщение: #653882

IT_Exp

Эксперт

34794 / 4073 / 2104

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

Сообщений: 32,602

Блог

11.04.2010, 14:13

Ответы с готовыми решениями:

Вывести все четные числа начиная с числа N и до числа M
помогите кто чем может: while вывести все четные числа начиная с числа N и до числа M. числа задает пользователь.

Вывести все четные числа, начиная с числа N и до числа M
составить программу в паскале,используя оператор WHILE.Вывести все четные числа,начиная с числа N и до числа M.Числа N и M задает...

Увеличить все чётные числа массива на значение первого чётного числа
Дан целочисленный массив размерности N. Увеличить все четные числа, содержащиеся в массиве, на значение первого четного числа. Если четные...

Inadequate

Retired

7727 / 2559 / 671

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

Сообщений: 5,100

11.04.2010, 14:15

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

Решение

Pascal
1
2
3
4
5
6
7
c := 0;
for i := 1 to 20 do
begin
  ReadLn(k);
  if  k mod 2 = 0 then 
    Inc(c);
end;

M128K145

8384 / 3617 / 419

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

Сообщений: 10,709

12.04.2010, 02:30

Так лучше

Pascal
1
2
3
4
5
6
for i := 1 to 20 do
begin
  ReadLn(k);
  if  k and 1 = 0 then 
    Inc(c);
end

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

BasicMan

Эксперт

29316 / 5623 / 2384

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

Сообщений: 30,364

Блог

12.04.2010, 02:30

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

целые числа,четные числа (3шт)
2) Урожай яблок в 1990г - 20 тонн,каждый год урожай уменьшался на 20%, с какого года урожай меньше 5 тонн и в каком году суммарный урожай...

В текстовый файл записать целые числа, четные числа переписать в новый файл
В текст. файл записать целые числа четные числа переписать в новый файл.

Замените все положительные четные числа на числа "перевертыши"
Пусть дана прямоугольная матрица А(n х m), элементами которой являются целые числа. Замените все положительные четные числа на числа,...

Четные цифры числа
А может кто нить знает как решить такую : найти количество четных цифр целого положительного числа.

четные числа в матрице Паскаль
Дан двумерный массив с целыми числами размерностью6*5. Составить одномерный массив, сосстоящий из первых четных чиисел каждой строки....

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

Или воспользуйтесь поиском по форуму:

Опции темы

Новые блоги и статьи Все статьи Все блоги /
Компиляция C++ с Clang API NullReferenced 24.03.2025 Компиляторы обычно воспринимаются как черные ящики, которые превращают исходный код в исполняемые файлы. Мы запускаем компилятор командой в терминале, и вуаля — получаем бинарник. Но что если нужно. . .	Многопоточное программирование в C#: Класс Thread UnmanagedCoder 24.03.2025 Когда запускается приложение на компьютере, операционная система создаёт для него процесс - виртуальное адресное пространство. В C# этот процесс изначально получает один поток выполнения — главный. . .	SwiftUI Data Flow: Передача данных между представлениями mobDevWorks 23.03.2025 При первом знакомстве со SwiftUI кажется, что фреймворк предлагает избыточное количество механизмов для передачи данных: @State, @Binding, @StateObject, @ObservedObject, @EnvironmentObject и другие. . . .	Моки в Java: Сравниваем Mockito, EasyMock, JMockit Javaican 23.03.2025 Как протестировать класс, который зависит от других сложных компонентов, таких как базы данных, веб-сервисы или другие классы, с которыми и так непросто работать в тестовом окружении? Для этого и. . .	Архитектурные паттерны микросервисов: ТОП-10 шаблонов ArchitectMsa 22.03.2025 Популярность микросервисной архитектуры объясняется множеством важных преимуществ. К примеру, она позволяет командам разработчиков работать независимо друг от друга, используя различные технологии и. . .
Оптимизация рендеринга в Unity: Сортировка миллиона спрайтов GameUnited 22.03.2025 Помните, когда наличие сотни спрайтов в игре приводило к существенному падению производительности? Время таких ограничений уходит в прошлое. Сегодня геймдев сталкивается с задачами совершенно иного. . .	Образование и практика Igor3D 21.03.2025 Добрый день А вот каково качество/ эффективность ВУЗовского образования? Аналитическая геометрия изучается в первом семестре и считается довольно легким курсом, что вполне справедливо. Ну хорошо,. . .	Lazarus. Таблица с объединением ячеек. Massaraksh7 21.03.2025 Понадобилась представление на экране таблицы с объединёнными ячейками. И не одной, а штук триста, и все разные. На Delphi я использовал для этих целей TStringGrid, и то, кривовато получалось. А в. . .	Async/await в Swift: Асинхронное программирование в iOS mobDevWorks 20.03.2025 Асинхронное программирование долго было одной из самых сложных задач для разработчиков iOS. В течение многих лет мы сражались с замыканиями, диспетчеризацией очередей и обратными вызовами, чтобы. . .	Колмогоровская сложность: Приёмы упрощения кода ArchitectMsa 20.03.2025 Наверное, каждый программист хотя бы раз сталкивался с кодом, который напоминает запутанный лабиринт — чем дальше в него погружаешься, тем сложнее найти выход. И когда мы говорим о сложности кода, мы. . .

Наверх