Блог для маленьких школьников и их родителей
ШколаЛа

Дан массив из n элементов. Найти сумму элементов которые крытны своим индексам.

Автор:
Предмет: Информатика
Уровень: 5 - 9 класс

Дан массив из n элементов. Найти сумму элементов которые крытны своим индексам.

Ответов к вопросу: 1
  • vladaobolenska
    11.07.2024 | 15:30

    program HelloWorld;

    const N = 100;

    var m:array [1.N] of real;

    var i: integer;

    var j: integer;

    var summ: real;

     

    begin

       
    summ:=0;

       
    for i := 1 to N do

       
    begin

            j:= random(555);

            m[i]:=j;

            if j mod i = 0 then
    summ:=summ+m[i];       

       
    end;

     

        write(summ:10:0);

    end.

Ответить на вопрос:
:p :-p 8) 8-) :lol: =( :( :-( :8 ;) ;-) :(( :o:
Нажимая на кнопку я даю согласие на обработку персональных данных и принимаю политику конфиденциальности.