Найти все двузначные числа ,в которых число десятков на 3 больше числа единиц.Срочно!!!Пожалуйста!
165
ОТВЕТЫ
Var i: integer;
begin
for i:=10 to 99 do
begin
if (i div 10 - i mod 10 gt; 3 ) then
print(i);
end
end.
begin
for i:=10 to 99 do
begin
if (i div 10 - i mod 10 gt; 3 ) then
print(i);
end
end.
246
Отв. дан
Mavelv
Для написания вопросов и ответов необходимо зарегистрироваться на сайте
Другие вопросы в разделе - Информатика
Сократ
Какие управляющие элементы могут содержаться в диалоговых окнах и ...
2019-02-01 09:02:21
Иоанникий
Решите задание по информатике или хотя бы дайте подсказку ...
2019-02-01 08:59:42
Паисий
Действие с информацией в результате которого мы получаем информацию ...
2019-02-01 08:55:52
Кира
Написать программу возведения в квадрат целого числа ...
2019-02-01 08:52:39