Предмет: Информатика, автор: 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.
Автор ответа: ИнформатикБУ
0
Плюс к эффективности)
Автор ответа: Аноним
0
Это спорно: подобные программы пишутся на один раз и часто бывает, что общее время на получения результата от момента получения задачи и по выдачи оказывается меньше совсем не у самой эффективной программы, а у той, которую было быстрее всего написать и отладить))))
Похожие вопросы
Предмет: Английский язык, автор: Victor1a64