Дан одномерный массив, состоящий из 10 элементов. Значение элементов вводятся с клавиатуры. Значения могут быть как положительные так и отрицательные. Найдите сумму четных положительных элементов. Результат вывести на форму
Ответы:
01-05-2012 10:20
program ex;var a, sum, i: integer; g: array [1..10] of integer;begin sum := 0; for i := 1 to 10 do begin read(a); g[i] := a; if (g[i] mod 2 = 0) then sum := sum + g[i]; end; write(sum)end.
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Дан одномерный массив, состоящий из 10 элементов. Значение элементов вводятся с клавиатуры. Значения могут быть как положительные так и отрицательные. Найдите сумму четных положительных элементов. Результат вывести на форму» от пользователя Света Кошкина в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!