Question

Рассмотрите блок схему и напишите программный код на языке программирования Pascal ​

Answer 1

var sum, m, k:integer;

begin

 sum := 0;

 m := 10;

 for k := 0 to 5 do begin

   sum := k+m;

   m := m-2;

 end;

 Writeln(sum);

end.