Чему будет равна переменная sum после выполнения фрагмента программы: i: =15; sum: =0; while i> 5 do begin sum: =sum+i/5; i: =i-5 end[/tex]

Пяти:)

{ Без расчётов выкладывать нельзя поэтому вот они }
begin
   var i: integer := 15;
   var sum: real := 0;
   while i > 5 do
   begin
    sum := sum + i / 5;
     i := i - 5
  end;
  writeln(sum);
end.