найти все двузначные числа ,в которых число десятков на 3 больше числа единиц.Срочно!!!
Пожалуйста!
Ответы на вопрос
Ответил xerex21
0
var i: integer;
begin
for i:=10 to 99 do
begin
if (i div 10 - i mod 10 > 3 ) then
print(i);
end
end.
begin
for i:=10 to 99 do
begin
if (i div 10 - i mod 10 > 3 ) then
print(i);
end
end.
Новые вопросы