Найти и вывести на экран все элементы массива целых чисел b(n), удовлетворяющих условию: остаток от деления на 5 равен 3.

// PascalABC.NET 3.3, сборка 1611 от 06.01.2018
// Внимание! Если программа не работает, обновите версию!
begin
var b:=ArrRandom(10,-100,100);
b.Where(x->x mod 5=3).Println();
end.

Приклади використання комп'ютерів в побуті:

- розваги: грати в ігри, слухати музику, дивитися фільми;

- комунікація: спілкуватися з іншими людьми, використовуючи глобальну мережу, інтернет портали, чат клієнти, електронну пошту або Skype;

- навчання: наприклад, розв'язання домашніх завдань;

- оплачувати рахунки;

- управління іншими пристроями побуту, наприклад, пральною машиною.

 

Приклади використання комп'ютерів в освіті:

- освоєння змісту уроків, наприклад, вивчення іноземних мов, використовуючи компакт диски з навчальною програмою, використання спеціальної освітньої програми з хімії, фізики, математики;

- створення розкладу для школи або іншого навчального закладу;

- облік школярів і вчителів.  

 

Приклади використання комп'ютерів у виробництві:

- аналіз фінансового положення і створення звітів;

- роботизована лінія виробництва;

- проектування нових виробів.  

 

Приклади використання комп'ютерів у торгівлі:

- інтернет магазини;

- облік товару на складі;

- облік покупок: зчитування штрих-коду та друк чеків.

 

Приклади використання комп'ютерів в державному управлінні:

- регістр жителів, транспортних засобів та підприємств;

- електронне голосування.

 

 Приклади використання комп'ютерів у медицині:

- проведення діагностики;

- оперування;

- облік пацієнтів.

Объяснение:

#include <iostream>

using namespace std;

int main()

{

int sum = 0;

int composition = 1;

bool plusSeq = 1;

int n = 0;

cout << "Size array - ";

cin >> n;

int* a = new int[n];

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

{

 a[i] = -10 + rand() % 21;

 sum += a[i];

 composition *= a[i];

 cout << a[i] << "  ";

}

 

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

{

 if (a[i] < 0)

  a[i] *= a[i];

}

for (int i = 1; i < n; i++)

{

 if (a[i] < a[i - 1])

 {

  plusSeq = 0;

  break;

 }

}

if (plusSeq)

 cout << "\nSum = " << sum;

else

 cout << "\nComposition = " << composition;

delete[]a;

return 0;

}

Объяснение: