GAECHKA
Твоя помощница в решении задач

Блок-схема по этому коду

Блок схему по этому коду , не могу сообразить в блок схемы
Program P;
var i,n,k,j:longint;
 
begin
writeln ('Ведите число');
 readln(n);
  i:=1;
writeln ('Результат');
 for i:=2 to n do 
begin
k:=0;
 for j:=2 to i-1 do
  if i mod j = 0 then k:=1;
   if (k=0)and(n mod i=0) then write(i, ' ');
end;
end.
0
вопрос задан

Источник


1 ответ
Решение
Типа так