Помогите пожалуйста!! Составьте программу в Паскале: Вычислить сумм всех нечётных чисел в интервале от 1 до 2К-1. Заранее ОГРОМНОЕ спасибо Вам!!
More Questions From This User See All
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Verified answer
Vark: integer; s: real;
begin
readln(k);
s := ((1+(2*k-1))/2)*(((2*k-1)-1)/2+1);
writeln(s);
end.