
Dalanius
5 год назад
Даю 25 Поинтов. Склади програму для знаходження всіх двоцифрових чисел що діляться на N або містять цифру N.
ОТВЕТЫ

Viktor
Oct 24, 2020
var i,n:integer;
begin
readln(n);
for i:=10 to 99 do
if (i mod n=0) or (i mod 10=n) or (i div 10=n) then writeln(i);
end.
begin
readln(n);
for i:=10 to 99 do
if (i mod n=0) or (i mod 10=n) or (i div 10=n) then writeln(i);
end.
300
Смежные вопросы: