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

Напишите программу, которая находит в массиве минимальный и максимальный из чётных положительных элементов. входные данные первая строка содержит размер массива n . во второй строке через пробел n чисел – элементы массива. гарантируется, что 0 < n ≤ 1 . выходные данные программа должна вывести в одной строке минимальный и максимальный из чётных положительных элементов массива, разделив их пробелом. если в массиве нет чётных положительных элементов, программа должна вывести два числа -1.
примеры
входные данные 6 -2 -1 2 3 5 6
выходные данные 2 6

👇
Ответ:
pechenkinaolga5
pechenkinaolga5
27.02.2020
#include <iostream>

using namespace std;

int main() {
int n;
 cin >> n;
 int *arr = new int[n];

for (int i = 0; i < n; i++) {
 cin >> arr[i];
}

int max = -1;
int min = -1;

for (int i = 1; i < n; i++) {
  if (arr[i] > 0 && arr[i] % 2 == 0) {
  if (min == -1) {
   min = arr[i];
  }
  if (max < arr[i]) {
    max = arr[i];
  }
   if (min > arr[i]) {
   min = arr[i];
  }
  }
 }
 cout << min << " " << max;
system("pause");
return 0;}
4,7(47 оценок)
Ответ:
kiss123kiss
kiss123kiss
27.02.2020

program HelloWorld;

var a: array of integer;

var N, min, max, i, variable:integer;

begin

   min := 32767;

   max := 0;

   readln(N);

   for i := 0 to N do begin  

       readln(variable);

       if (variable > 0) and (variable mod 2 = 0) and (variable > max) then

           max := variable;

       if (variable > 0) and (variable mod 2 = 0) and (variable < min) then

           min := variable;

   end;

   if (max <> 0) and (min <> 32767) then

       writeln(min, ' ', max)

   else  

       writeln(-1);

end.

4,5(39 оценок)
Ответ:
vvvtalik3
vvvtalik3
27.02.2020
N=int(input('задайте размер массива  '));
lst=input().split(' ');
mn=10e10;
mx=0; p=-1; 
for i in range (0,n):
   if (int(lst[i])>0 and int(lst[i]) % 2==0):
       if (int(lst[i])<mn):
             mn=int(lst[i]);
       if (int(lst[i])>mx):
             mx=int(lst[i]);
       p=1;
if (p<0): print(p,p);
else: print(mn,mx);

задайте размер массива  6
-3 -4 -6 5 7 9
-1 -1

задайте размер массива  6
-2 -1 2 3 5 6
2 6
4,6(79 оценок)
Открыть все ответы
Ответ:
karinayackupow
karinayackupow
27.02.2020

В обратном направлении от двух населенных пунктов на расстоянии 600 км. Через 4 часа вне комбайна мотоцикл в 4 раза быстрее его встретились. а) Какая скорость комбайна? б) Какая скорость у мотоцикла? В) сколько часов проезжает комбайн между двумя населенными пунктами?. а) Направленный отрезок называется вектором. НЕТ ДА б) Задано в координатной плоскости Через точки A (2; -2), B (-1; 4), Нарисуйте вектор AB.Точка A (2; 3) на рисунке - это точка, симметричная относительно оси OX. найти: А. А (-2; 3) Б. А (2; -3) К. А (-2; -3) Д. А, (-3; 2)Күндер ұзарып, табиғат гүлдене бастайды.3. а) Бағытталған кесінді вектор деп аталады.

ЖОК

ИЯ

b) Координаталық жазықтықта берілген

А (2; -2), B(-1;4) нүктелері арқылы,

АВ векторын кескіндеңіз.Суреттегі А (2;3) нүктесі ОХ осіне қарағанда симметриялы нүктесін

табыңыз:

A. A(-2;3)

B. A(2;-3)

C. A(-2;-3)

D. А, (-3;2)Менің ең жақсы көретін жыл мезгілім – ол көктем. Бұл мезгіл маған қуаныш сезімін және ерекше көңіл-күйді сыйлайды. Күндер ұзарып, табиғат гүлдене бастайды. Аспан ашылып, күн сәулесі қарды ерітеді. Құстар қайта оралып, жерден алғашқы гүлдер шығып, жануарлар және жәндіктер қысқы ұйқыдан оянады. Адамдар өздерін бақытты сезінеді. Өйткені, көпкен күткен уақыт келді! Барлық адамдар белсенді өмір сүре бастайды. Ауада көктемнің иісі пайда болады. Менің ойымша, көктем – ең әдемі жыл мезгілі. Адамдар өздерін бақытты сезінеді. Өйткені, көпкен күткен уақыт келді! Барлық адамдар белсенді өмір сүре бастайды. Ауада көктемнің иісі пайда болады. Көктем – ең әдемі жыл мезгілі!

4,8(23 оценок)
Ответ:
shabdanova16
shabdanova16
27.02.2020

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

28

29

30

31

32

33

34

35

36

37

38

39

var a: array[0..100,0..100] of integer;

 

n, m, i, j, max, col: integer;

 

 

 

begin

 

  read(n);

 

  read(m);  

 

  for i: =0 to n-1 do

 

  for j: =0 to m-1 do

 

  begin

 

  read(a[i,j]);

 

  if max< a[i,j] then max: =a[i,j];

 

  end;

 

  for i: =0 to n-1 do

 

  for j: =0 to m-1 do  

 

  if max=a[i,j] then begin inc(col); break; end;

 

  writeln(col);

 

  for i: =0 to n-1 do

 

  for j: =0 to m-1 do  

 

  if max=a[i,j] then begin write(i, ' '); break; end;    

 

end.

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