Составьте программу проверяющую что введенное целое число является четным

Условие задачи : Определить является число введенное пользователем четным.

Сложность : легкая.

Эта задача очень часто встречается в школах и институтах, так что давайте её разберем.

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

Как мы определяем четность числа в жизни, мы проверяем делиться ли оно на 2, точно также и здесь, мы проверим делиться ли оно на 2 .

Для начала создадим каркас :

uses
crt;
var
number :
integer
;
begin
end
.

Четность можно определять только у целых чисел, не забывайте об этом.

Дальше просим пользователя ввести число и сразу же напишем условие :

write
(
‘Введите число и нажмите ‘
); readln(number);
if
number
mod
2
=
0
then

writeln
(
‘Число четное’
)
else
writeln
(
‘Число не четное’
);

Посчитать четные и нечетные цифры числа. Решение задачи на Python

Всё довольно просто, как я и сказал операции mod ищет остаток от деления в нашем случае определяет делиться ли нацело число на 2.

Если не обращать внимание на четность и вместо двойки подставить 3.

number
mod
3

Т.е. если number у нас будет 10, то тогда число 10 не делиться на 3, т.к. будет остаток , а если будет 9 , тогда уже будет делиться, вот так и со всеми числами.

Весь код программы :

uses
crt;
var
number :
integer
;
begin
clrscr;
write
(
‘Введите число и нажмите ‘
); readln(number);
if
number
mod
2
=
0
then

writeln
(
‘Число четное’
)
else
writeln
(
‘Число не четное’
);
readln;

end
.

Предыдущая

Источник: sprint-olympic.ru

Составьте

Правильный ответ на вопрос «Составьте программу, проверяющую, что введенное число является четным или нечетным На языке VBA . » по предмету Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант — оцените ответы на похожие вопросы. Но если вдруг и это не помогло — задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!

Новые вопросы по информатике

Объём видеопамяти составляет 100 Кбайт. Графический режим работает в режиме 640 х200 пикселей. Какое максимальное кол-во цветов может содержать палитра?

C++ | Определение чётности или нечётности числа

Переведите число 202 из восьмеричной системы счисления в десятичную

Переведите величины из одних единиц измерения информации в другие: 1 4 Гбайта=? Кбайт 2 217 Мбайт=? Гбайт 3 13 Мбит=? бит 4 27 Гбит=? бит 5 228 бит=? Мбайт 6 227 Гбит=? Мбайт 7 231 Кбайт=? Мбит

Вводятся 3 числа, вывести на экран нечетные числа pascal

1. Посчитай, сколько бит информации содержит 19 байт 2. Посчитай, сколько байт информации содержат 2 кб 3. Посчитай, сколько байт информации содержит 144 бит

Главная » Информатика » Составьте программу, проверяющую, что введенное число является четным или нечетным На языке VBA

Источник: abiturient.pro

Напишите программу. значение наименьшего числа.

Напишите программу, которая в последовательности целых чисел определяет значение наименьшего числа, из всех четных введенных чисел. Программа получает на вход целые положительные числа, количество введенных чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность).

Количество введенных чисел не превышает 1000. Все числа не превышают 30000. Среди введенных чисел есть хотя бы одно четное

Программа должна вывести одно число: наименьшее из всех четных введенных чисел.

Пример работы программы:

Входные данные: 10, 7, 12, 0.

Выходные данные: 10.

Решение:

Код программы на Паскале (Способ 1):

Program nomer3; Var a, min: integer; Begin Write(‘Vvedite a: ‘); readln(a); Min:=30000; While a<>0 do begin if (a mod 2 =0) and (a

Код программы на Паскале (Способ 2):

Program nomer3; Var a, min: integer; Begin Min:=30000; Repeat Write(‘Vvedite a: ‘); readln(a); if (a<>0) and (a mod 2 =0) and (a
Похожие материалы

  • Напишите программу, печатающую значение EOF (Си)
  • Удаление комментариев кода (Си/Си++)
  • Напишите программу, которая в последовательности.
  • Напишите программу. сумму чисел, кратных 6.

Источник: vopvet.ru

Рейтинг
( Пока оценок нет )
Загрузка ...
EFT-Soft.ru