Вопрос по информатике:
Дано трехзначное число. Если в этом числе есть хотя бы одна цифра равная пяти, то приписать к этому числу справа две пятерки. Если нет, то вывести сообщение «NO». напишите пожалуйста алгоритм в паскале
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 02.04.2015 13:40
- Информатика
- remove_red_eye 15983
- thumb_up 33
Ответы и объяснения 1
var q,w,e,r,t:integer; znanijacom:integer;
Begin
read(znanijacom);
q:=length(znanijacom);
t:=znanijacom;
for w:=1 to q do begin //Программа работает не только с трехзначными числами, что увеличивает возможность программы
e:=znanijacom mod 10;
if e=5 then r:=1;
znanijacom:=znanijacom div 10;
end;
if r=1 then writeln(t,'55') else writeln('No');
End.
- 03.04.2015 03:11
- thumb_up 31
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.