1. написать программу, которая в заданном с клавиатуры массиве из 7 целых чисел находит сумму элементов, меньших 4. 2. написать программу, которая находит произведение элементов массива натуральных чисел из 15 элементов, заданного случайным образом. 3. написать программу, которая определяет, находится ли в заданном случайным образом массиве из n натуральных чисел заданное число m (m вводятся с клавиатуры, n -константа).
#include <iostream>
using namespace std;
int main()
{
int a, b, c;
int amount = 0;
cin >> a >> b >> c;
if (a > 0)
{
amount += a;
}
if (b > 0)
{
amount += b;
}
if (c > 0)
{
amount += c;
}
cout << amount;
}
Объяснение:
#include <iostream> // Библиотека ввода - вывода
using namespace std; // Пространство имен
int main()
{
int a, b, c; // Создание целочисленных переменных a, b, c
int amount = 0; // Создание целочисленной переменной amount, которая будет хранить сумму положительных чисел. Значение переменной = 0
cin >> a >> b >> c; // Ввод с клавиатуры значений переменных a, b, c
if (a > 0) // Если значение переменной a > 0
{
amount += a; // К значению переменной amount прибавляем значение переменной a
}
if (b > 0) // Если значение переменной b > 0
{
amount += b; // К значению переменной amount прибавляем значение переменной b
}
if (c > 0) // Если значение переменной b > 0
{
amount += c; // К значению переменной amount прибавляем значение переменной c
}
cout << amount; // Вывод значения переменной amount
}
// Язык Паскаль
Program Massiv;
Uses Crt;
const n=10; // Нужно больше сам подставишь нужное число
var a:array[1..n] of integer;
i,c:integer;
begin
clrscr;
write('Введите элементы массива: ');
c:=0;
for i:=1 to n do
begin
readln(a[i]);
if (a[i] mod 2)=0 then c:=c+1;
end;
writeln;
write('Исходный массив:');
for i:=1 to n do write(a[i],' ');
writeln('Количество чётных элементов: ',c);
readkey;
end.