Вопрос по информатике:
Определить является заданное число трехзначным. Пожалуйста помогите срочно если не сложно то всю программу полностью.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 27.05.2016 05:37
- Информатика
- remove_red_eye 2346
- thumb_up 41
Ответы и объяснения 2
var a : integer;
begin
readln(a);
if (a div 10 >0)and(a div 100>0)and(a div 100<10) then writeln('Число трехзначное')
else writeln('Число не трехзначное');
end.
- 28.05.2016 05:57
- thumb_up 3
var n:integer;
Begin
read(n);
if (n>99) and (n<1000) then writeln('Yes')
else writeln('No');
End.
- 29.05.2016 19:39
- thumb_up 22
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.