profile
Опубликовано 6 лет назад по предмету Информатика от Аккаунт удален

Найдите сумму элементов массива, который делится на 5 и 8 одновременно

 

  1. Ответ
    Ответ дан yasadc
    uses crt;
    const n=10;
    var a:array[1..n] of integer;
    i,s:integer;
    begin
    randomize;
    for i:=1 to n do
    begin
    a[i]:=random(1000);
    write(a[i],' ');
    end;
    writeln;
    for i:=1 to n do
    if (a[i] mod 5=0) and (a[i] mod 8=0) then s:=s+a[i];
    writeln(s);
    end.

    1. Ответ
      Ответ дан Аккаунт удален
      СПАСИБО, ОГРОМНОЕ!!!!!
    2. Ответ
      Ответ дан yasadc
      Пожалуйста)
Самые новые вопросы