М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
дима2903
дима2903
23.12.2020 21:45 •  Информатика

Введите, что будет выведено в результате
выполнения следующего фрагмента программы:
а:= 10;
b:= 20;
c:= 30;
х:= b;
if 2*a>b then x:= a;
if 2*c<x then x:= C;
writeln (x):​

👇
Открыть все ответы
Ответ:
burmistrowkiri
burmistrowkiri
23.12.2020

#include <iostream>

#include <conio.h>

using namespace std;

int main()

{

setlocale(LC_ALL, "Russian");

const int SIZE = 20;

int Arr[SIZE] = {};

int Summa = 0;

cout << "Введите числа" << '\n';

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

{

 cin >> Arr[i];

 if ((Arr[i] < 1500) && (Arr[i]>-1500)) //Проверяем числа в массиве больше,меньше 1500,-1500.

 {

  if (Arr[i]==0) // Проверяем встретиться ли нам 0.

  {

   break;//если встретился 0 то выходим из этого условия, а потом и из цикла.

  }

  if (Arr[i] % 5 == 0) // Проверяем числа на кратность 5. Если кратно то

  {

   Summa += Arr[i]; // Складываем все что кратно 5 в переменную Summa.

  }

 }

 else //Этот else относиться к первому if где идет проверка больше,меньше 1500,-1500.

 {

  i--; // декремент не дает нам дальше заполнять массив покуда не введем число

       // входящее в диапазон [-1500;1500].

  cout << "Ваше число по модулю превышает 1500 " << endl; // оповещяем о том что введено неверное число

 }

 

}

cout << "Сумма всех чисел, кратных 5 = " << Summa << endl;

_getch();// это просто чтобы окно не закрывалось, можно и в самом проекте это сделать.

return 0;

}

Объяснение:

4,6(1 оценок)
Ответ:
XMCBVSAJHDBV
XMCBVSAJHDBV
23.12.2020
// PascalABC.NET 3.3, сборка 1579 от 18.11.2017
// Внимание! Если программа не работает, обновите версию!

1)

begin
  var (n,m):=ReadInteger2('Количество строк и столбцов в массиве:');
  Writeln('*** Исходный массив [',n,',',m,'] ***');
  var a:=MatrRandom(n,m,-99,99);
  a.Println(4); Writeln(4*a.ColCount*'-');
  var b:=a.Rows.Select(r->r.Where(t->t.IsOdd).LastOrDefault); b.Println;
end.

Пример
Количество строк и столбцов в массиве: 8 5
*** Исходный массив [8,5] ***
 -41  36 -99  14  17
 -22  12  71 -94 -42
 -35 -40  26   2  24
  39  17  20  11  84
 -53 -18  97  -6   5
   2  67 -54  -6  -3
  95 -87  90 -13 -37
 -81 -21  61 -90 -60
--------------------
17 71 -35 11 5 -3 -37 61

2)

begin
  Writeln('*** Исходный массив ***');
  var a:=MatrRandom(20,10,2,5);
  a.Println(2); Writeln(2*a.ColCount*'-');
  Writeln('Ср. 5-го ученика: ',a.Row(4).Average)
end.

Пример
*** Исходный массив ***
 2 2 3 3 4 3 4 2 3 2
 4 3 2 3 2 4 3 2 5 3
 4 2 3 3 4 5 5 2 2 4
 5 2 4 2 4 5 4 2 3 3
 5 3 3 2 3 4 5 4 4 4
 3 2 3 2 3 2 5 2 4 4
 4 4 5 5 2 4 5 5 4 2
 2 2 5 4 4 2 4 3 2 2
 2 2 4 4 2 4 4 4 5 4
 2 3 4 4 5 3 3 4 5 4
 5 2 5 3 3 2 3 5 3 2
 3 4 2 3 4 3 2 3 4 3
 2 2 2 2 2 4 4 2 4 2
 5 2 3 3 3 5 3 2 2 5
 2 4 2 4 3 3 3 2 5 4
 3 2 5 4 4 4 5 5 3 5
 4 3 2 3 3 2 2 4 2 4
 2 5 2 5 2 3 2 4 5 4
 3 3 2 2 5 4 3 5 4 4
 2 3 5 3 3 5 4 5 2 2
--------------------
Ср. 5-го ученика: 3.7

Завтра нужно сдать , а у меня никак не получается ; ( 1) дан двумерный массив целых чисел. сформиров
4,4(34 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ