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

102

407

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

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

sarvaryusuf99

Информатика

4,4(54 оценок)

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.

katevina

Информатика

4,5(5 оценок)

// pascalabc.net 3.0, сборка 1144 от 16.01.2016 begin var n: =readinteger('n='); var a: =arrrandom(n,1,50); a.println; a.where(x-> x mod 7=0).println end. тестовое решение: n= 12 26 7 32 16 26 8 40 34 49 28 10 10 7 49 28