1. Информатика
  2. Вычислить сумму квадратов n

Вычислить сумму квадратов n четных натуральных чисел

baxrom2 baxrom2    1   08.06.2019 19:00    0

Ответы
окткл окткл  07.07.2020 20:42
var
  i, n: byte;
  s: longint;

begin
  readln(n);
  for i := 2 to n * 2 do
    if (i mod 2 = 0) then
      s := s + sqr(i);
  writeln(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Пиирмвп Пиирмвп  28.04.2021 23:20
Дан рекурсивный алгоритм: def F(n):if n 0:print( * )F(n-2)F(n-1)F(n-1)print( * )Сколько символов звездочка будет напечатано на экране при выполнениивызова F(5)?...
panda068 panda068  28.04.2021 23:19
Информатика. Паскаль 1. Дано целое число N =2. Запишите программу, вычисляющую количество четных натуральных чисел от 2 до N. Вывести полученное значение на экран.2. С клавиатуры...
golubalex01 golubalex01  23.04.2019 10:21
Смастера диаграмм (тип диаграммы — точечная) постройте графики следующих функций: а) у = |х| для значений аргумента, изменяющихся от -10 до 10 с шагом 1; б) у = 2х2 + 5х -...
san11217 san11217  23.04.2019 10:23
Смастера диаграмм постройте столбчатую и круговую диаграммы своих расходов за неделю. столбчатая диаграмма «расходы по статьям» строится по данным несмежных диапазонов ячеек...
natalyaepishenk natalyaepishenk  23.04.2019 10:32
1. какие элементы оформления можно добавить на слайд? 1) рисунки 2) программы 3) звуки 4) декоративный текст 2.в каком режиме удобно редактировать и оформлять презентацию:...
svetasvetashi svetasvetashi  12.02.2022 05:27
Что это за вирус? И почему он так именован?...
beliy112329 beliy112329  12.02.2022 05:42
установи соответствии между операторами записанами на языке программирования Python и результатами их выполнения...
tapilina92 tapilina92  21.12.2019 18:30
Если(a2= дневное ; если(b2 =5; b2*1; если(b2 =10; b2*0,8; b2*0,6)); если(b2 =15; b2*0,5; если(b2 =30; b2*0,3; b2*0, по этой формуле составить макрос в excel...
катя10467743 катя10467743  21.12.2019 18:25
Написать массив на си. сформировать массив из 20 чисел в порядке {20,18,}, чтобы последние 10 чисел выводились в обратном порядке....
1234567891155 1234567891155  21.12.2019 18:24
Выполните умножение чисел: 1а,9в16*52,с316; 111,112*1,012...

Популярные вопросы