КОРМИЛИЦЫНА
?>

Решите номер вас это мои последние ​

Информатика

Ответы

борисовна Елена78

Объяснение:одномерного массива:

varимямассива: array [нижняяграница..верхняяграница] ofтипэлементов;

двумерного массива:

varимямассива: array [нижняяграница1..верхняяграница1,нижняяграница2..верхняяграница2] ofтипэлементов;

 

заполение массива:

одномерный массив: for i: =1 to5do readln(a[i]); {ввод с клавиатуры}

двумерный массив: for i: =1 to3do

                                                                           for j: =1 to2do readln(a[i,j]);

 

вывод массива на экран:

в столбец: for i: =1 to5do writeln(a[i]);

в строку: for i: =1 to5do write(a[i],' ');

матрица двумерного массива:

for i: =1 to n do

begin

for j: =1 to m do

write (a[i,j]: 4);

writeln;

end;

 

действия с одномерным массивом:

вычисление суммы элементов:

s: =0;

for i: =1 to n do s: =s+a[i];

подсчет элементов, удовлетворяющих условию:

k: =0;

for i: =1 tondo

if a[i] условиеотбора then k: =k+1;

vit010916

#include <iostream>

using namespace std;

int main()  

{

 int A[15] = {};

 for (int i = 0; i < 15; i++)

 {

   cin >> A[i];

 }

 for (int i = 0; i < 15; i++)

 {

   cout << A[i] << " ";

 }

 int amount = 0;

 for (int i = 0; i < 15; i++)

 {

   if (i % 2 != 0)

   {

     amount += A[i];

   }

 }

 cout << endl << "Сумма = " << amount;

}

Объяснение:

#include <iostream>  // Библиотека ввода - вывода

using namespace std;  // Пространство имён

int main()  

{

 int A[15] = {};  // Объявление целочисленного массива размером 15, заполненного нулями

 for (int i = 0; i < 15; i++)  // Ввод массива

 {

   cin >> A[i];  // Ввод массива

 }

 for (int i = 0; i < 15; i++)  // Вывод массива

 {

   cout << A[i] << " ";  // Вывод массива

 }

 int amount = 0;  // Переменная, хранящая сумму

 for (int i = 0; i < 15; i++)  // Идём по массиву

 {

   if (i % 2 != 0)  // Если индекс нечетный

   {

     amount += A[i];  // Суммируем

   }

 }

 cout << endl << "Сумма = " << amount;  // Выводим ответ

}

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Решите номер вас это мои последние ​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

борисовна Елена78
Кочугурова
alenchik19938823
Ионов202
ovdei71
zibuxin6
predatorfishing608
Семеновна-Павел
Mexx9050
СмыковаДарья1969
kriapex
zrv85
Филиппович_Николаевич
alexandergulyamov
gabramova