Вопрос по информатике:
Составьте и выполните программу решения задачи:
Если между цифрами двузначного числа записать ноль, то полученное трехзначное число
будет в 7 раз больше первоначального. Найдите это число.
Паскаль
Пожаловаться
- 09.08.2018 22:10
- Информатика
- remove_red_eye 10097
- thumb_up 12
Ответы и объяснения 2
Если между цифрами двузначного числа записать ноль, то полученное трехзначное число
будет в 7 раз больше первоначального. Найдите это число.
будет в 7 раз больше первоначального. Найдите это число.
Пожаловаться
- 01.01.1970 00:00
- thumb_up 28
Вариант без строк.
//Pascal
var tmp1, tmp2, i: integer;
begin
for i := 10 to 99 do
begin
tmp1 := 0; tmp2 := 0;
tmp1 := (i div 10)*100;
tmp2 := i mod 10;
tmp2 := tmp1 + tmp2;
if tmp2 = i*7 then writeln('Найдено число = ', i);
end;
readln;
end.
Результат:
Найдено число = 15
//Pascal
var tmp1, tmp2, i: integer;
begin
for i := 10 to 99 do
begin
tmp1 := 0; tmp2 := 0;
tmp1 := (i div 10)*100;
tmp2 := i mod 10;
tmp2 := tmp1 + tmp2;
if tmp2 = i*7 then writeln('Найдено число = ', i);
end;
readln;
end.
Результат:
Найдено число = 15
Пожаловаться
- 01.01.1970 00:00
- thumb_up 7
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы