Составьте программу,которая запрашивает значения элементов одномерного числового массива А, состоящего из10 элементов, формирует и выводит на экран в строку данный массив. Найти сумму элементов, кратных 3; количество нулевых элементов; и произведение элементов, стоящих на нечётных местах.
Ответы:
10-02-2017 02:10
var z,i,g,s:longint a:array[0..100]of longint; begin z:=1; for i:=1 to 10 do begin read(a[i]); if a[i] mod 3=0 then inc(s,a[i]); if a[i]=0 then inc(g); if i mod 2>0 then z:=z*a[i]; write(a[i],); end; writeln; writeln(s); writeln(g); writeln(z); end.
⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Составьте программу,которая запрашивает значения элементов одномерного числового массива А, состоящего из10 элементов, формирует и выводит на экран в строку данный массив. Найти сумму элементов, кратных 3; количество нулевых элементов; и произведение элементов, стоящих на нечётных местах.» от пользователя Асия Гухман в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.
Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!