Вопрос по информатике:
Дано целое число, лежащее в диапазоне от 1 до 9999. Вывести строку — словесное описание данного числа вида "четное двузначное число", "нечетное четырехзначное число" и т.д.
Пожаловаться
- 07.06.2018 08:03
- Информатика
- remove_red_eye 12865
- thumb_up 11
Ответы и объяснения 1
// PascalABC.NET 3.2, сборка 1439 от 09.05.2017
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('n=');
if n.IsOdd then Write('Нечетное ')
else Write('Четное ');
if n>999 then Write('четырех')
else
if n>99 then Write('трех')
else
if n>2 then Write('двух')
else Write('одно');
Writeln('значное число')
end.
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('n=');
if n.IsOdd then Write('Нечетное ')
else Write('Четное ');
if n>999 then Write('четырех')
else
if n>99 then Write('трех')
else
if n>2 then Write('двух')
else Write('одно');
Writeln('значное число')
end.
Пожаловаться
- 08.06.2018 01:19
- thumb_up 18
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы