Предмет: Информатика,
автор: VVSer
Помогите пожалуйста!! Составьте программу в Паскале: Вычислить сумм всех нечётных чисел в интервале от 1 до 2К-1. Заранее ОГРОМНОЕ спасибо Вам!!
Ответы
Автор ответа:
0
var
k: integer; s: real;
begin
readln(k);
s := ((1+(2*k-1))/2)*(((2*k-1)-1)/2+1);
writeln(s);
end.
k: integer; s: real;
begin
readln(k);
s := ((1+(2*k-1))/2)*(((2*k-1)-1)/2+1);
writeln(s);
end.
Автор ответа:
0
Плюс к эффективности)
Автор ответа:
0
Это спорно: подобные программы пишутся на один раз и часто бывает, что общее время на получения результата от момента получения задачи и по выдачи оказывается меньше совсем не у самой эффективной программы, а у той, которую было быстрее всего написать и отладить))))
Похожие вопросы
Предмет: Қазақ тiлi,
автор: tamila7669
Предмет: Русский язык,
автор: ardaknagymzanov
Предмет: Английский язык,
автор: Victor1a64
Предмет: Математика,
автор: patsun873
Предмет: Математика,
автор: dtdmv