Вводится целое число, если это цифра, то определить четная она или нет, а если число, то определить попадает ли оно в диапазон от 10 до 100, если нет, то выдать соответствующее сообщение.
Паскаль
255
440
Ответы на вопрос:
begin var n := ReadInteger('n:'); if n in 0..9 then Print('Это',n.IsEven?'чётная':'нечётная','цифра') else Print('Это число',n in 10..100?'попадает':'не попадает'); end.
Пример работы:
Сейчас в мире развиваются новые технологии. сейчас книги не пишут в ручную, а печатают на компьютере. нам сложно прожить без интернета "каждый день мы ищем там интересную информацию, узнаем новое, смотрим фильмы, учимся".кто то зарабатывает в интернете. мне кажется что информатику нужно изучать для того чтобы в будущем мы были развиты в компьютерных технологиях и умели работать за компьютером. потому что учителя, работники офисов, врачи и еще много профессий зависят от компьютеров, а информатика учит нас быть с компьютерами на ты. p.s. писал сам)
Популярно: Информатика
-
тамусік02.04.2022 14:39
-
ruevtop04.09.2020 07:09
-
Ильдар2111121.05.2021 17:55
-
ŤằтьЯℌa200519.01.2020 23:30
-
CoOlbOY2003g10.05.2023 21:50
-
yuliamoisei21.10.2020 01:04
-
vilortnt01.12.2020 02:36
-
k1974509.02.2022 00:16
-
саяна719.03.2023 11:21
-
Damirok2131.08.2020 06:59