Вопрос по информатике:
В Паскале ввести целое число и определить сколько в этом числе троек. Я не очень в программировании, поэтому помогите пожалуйста ))
- 16.06.2018 21:58
- Информатика
- remove_red_eye 1381
- thumb_up 13
Ответы и объяснения 1
Var a,b,c,d:integer;
begin
writeln('введите числo');
readln(a);
b:=0;
while a0 do begin
c:=a mod 10;
a:=a div 10;
if c=3 then b:=b+1;
end;
writeln('количество троек в числе ',b);
end.
- 17.06.2018 14:53
- thumb_up 47
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.