Var k, n, i: integer;
sum: real;
begin
readln(n, k);
sum:=16;
for i:=1 to n-1 do
sum:=sum+k/i*3;
writeln(sum);
end.
Цикл вида for i:=a to b выполняется b-a+1раз.
В данном случае 4-0+1=5.
<u>Ответ:</u> 5 раз.
#include <iostream>#include <iterator>#include <algorithm>#include <vector>#include <string>#include <numeric>
int main(void){ std::cout << std::accumulate(std::istream_iterator< int >(std::cin), std::istream_iterator< int >(), 0); return 0;}
Это элементарно.
Разветвляющийся