безотлагательно, составьте пожалуйста блок-схему, вот по паскалю она решенасама задача звучит

Безотлагательно, составьте пожалуйста блок-схему, вот по паскалю она решена
сама задачка звучит так: В каких двузначных числах двойная сумма цифр одинакова их творению?var
a : integer;
b : integer;
begin
writeln(' Решение ');
for a:=1 to 9 do
for b:=1 to 9 do
begin
if (a+b)*2=a*b then
writeln(a*10+b);
end;
end.