Вопрос по информатике:
Ввести ціле число вивести повідомлення число парне чи непарне використовуючи операцію div
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 23.06.2016 20:28
- Информатика
- remove_red_eye 17631
- thumb_up 22
Ответы и объяснения 2
Var
n:integer;
begin
Write('n= '); Read(n);
if n = (n div 2)*2 then Writeln('Четное')
else Writeln('Нечетное')
end.
Тестовое решение:
n= 26321
Нечетное
- 24.06.2016 06:14
- thumb_up 37
//Можно даже без условного оператора
//Pascal ABC.NET Версия 2.2 Сборка 790
const ar:array[-1..1]of string =('Нечётное','Чётное','Нечётное');
var n,k:integer;
begin
readln(n);
try
k:=5 div n ; //но div тут всё-таки есть
writeln (ar[n mod 2]);
except
writeln('0');
end;
end.
Пример ввода:
32767
Пример вывода:
Нечётное
- 25.06.2016 20:58
- thumb_up 8
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.