Вопрос по информатике:
Определить является заданное число трехзначным. Пожалуйста помогите срочно если не сложно то всю программу полностью.
- 27.05.2016 05:37
- Информатика
- remove_red_eye 2374
- thumb_up 42
Ответы и объяснения 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 4
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 23
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.