Program zadacha;
Var i,j,sum: integer;
begin
for i:=10 to 99 do
begin
for j:=10 to 99 do
begin
sum:=";i;"+";j;";
if (sum mod i=0) and (sum mod j=0) then
begin
writeln("";i;" & ";j;"");
end;
end;
end;
end.
Современные инструменты для криптотрейдинга: как технологии помогают принимать решения
Апостиль в Лос-Анджелесе без лишних нервов и бумажной волокиты
Основные этапы разработки сайта для стоматологической клиники
Продвижение своими сайтами как стратегия роста и независимости