Предмет: Информатика, автор: GulabusAlabus

Создать алгоритм вычисления суммы кубов четных чисел от 100 до 300.

Ответы

Автор ответа: HRAshton
0
VAR
  S: longint;

begin
  for k: integer := 100 to 300 do
    s += sqr(k);
  writeln(s);
end.
Приложения:
Автор ответа: GulabusAlabus
0
В паскале, извиняюсь что не уточнил.
Автор ответа: archery
0
var
    s: longint;
    i: integer;
begin
    s := 0;
    for i := 100 to 300 do
        s := s + i * i * i;
    writeln(s);
end.
Приложения:
Похожие вопросы
Предмет: Биология, автор: Вaлюшkа
Предмет: Математика, автор: Mirofimol