Регистрация
МВ080706
05.01.2022 00:17
Информатика
Есть ответ 👍

Каждый из 12 элементов массива р равен квадрату его индекса. найти сумму этих квадраторв. (составить алгоритм решения и программу)

185
405
Посмотреть ответы 2

Ответы на вопрос:

katyasergienko2004
katyasergienko2004
4,7(75 оценок)

ну алгоритм: просто суммируешь поочерёдно.(можно кубиками нарисовать, но это мне делать не удобно, тем более не сложно)

вот прога на паскале:

program sym

var p: array[1..12] of integer;

s,i: integer;

begin

s: =0;

for i: =1 to 12 do

p[i]: =i*i; //если нет уже готового массива

for i: =1 to 12 do

s: =s+p[i];

write(s)

end.

ну тут кстати массив излишен, если надо просто найти сумму:

program sym1

var s,i: integer;

begin

s: =0;

for i: =1 to 12 do

s: =s+i*i;

write(s)

end.

я у себя не проверял, но должно работать)

sab2021
sab2021
4,4(32 оценок)

program xxx;

    var i, k, d, e, s : integer;

begin

  k: =0;

  for i: = 10 to 99 do

    begin

          d: = i div 10;

          e: = i mod 10;

          s: =d + e;

          if i mod s = 0 then k: =k+1

    end;

    write ('кол-во чисел которые делятся на сумму своих цифр=', k);

    readln

end.

Популярно: Информатика