40

Помогите с программой, плиз) Составте программу, которая заполняет массив а[1… 8]…

06 марта 2023

Помогите с программой, плиз) Составте программу, которая заполняет массив а[1… 8] случайными целыми числами от 1 до 10 и выводит на экран количество элементов с четными значениями и сумму элементов массива с нечетными значениями

категория: информатика



57

Program z10; var a,b: Array [1… 8] of integer; i,s,k: integer; BeginRandomize; For i: =1 to 8 dobegina[i]: =random (10); if (a[i] mod 2=0) then begins: =s+a[i]; k: =k+1; end; end; write (s,',k); end.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...