Вычислите сумму всех элементов массива,исключая элементы кратные 5.На языке Паскаль.

Ответы:

Айжан Лаврова

07-03-2010 13:41

Program n1;var a: array[1..10] of integer;i: integer;sum: real;beginrandomize;sum:=0;for i:=1 to 10 do begina[i]:=random(21)-10;write(a[i],);if a[i] mod 5<>0 then sum:=sum+a[i];end;writeln;write(sum);end.

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя Afina Homchenko

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Вычислите сумму всех элементов массива,исключая элементы кратные 5.На языке Паскаль.» от пользователя Afina Homchenko в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!