logo
Вход Регистрация Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Насонка
Насонка
13.02.2021 14:55 •  Информатика

Очень ! Можете с заданием и объяснить как это делать ?

В таблице приведены запросы к поисковому серверу .
Расположите обозначения запросов в порядке ВОЗРАСТАНИЯ.
Для обозначения логической операции «ИЛИ» в запросе используется символом «|» , а для логической операции «И» - «&»

Очень сделать всё правильно !!

Код Запросы
А мопсы
Б мопсы & паспорт & родословная
В мопсы & паспорт
Г мопсы | пудели

Код
А рассказы | повести | Толстой | Чехов
Б рассказы | повести
В рассказы & повести
Г рассказы | повести | Толстой

, очень ! Можно даже без объяснения самое главное чтобы всё было правильно!

👇
Увидеть ответ
Ответ:
denis200518
denis200518
13.02.2021

1. БВАГ

Б мопсы & паспорт & родословная

В мопсы & паспорт

А мопсы

Г мопсы | пудели

2. ВБГА

В рассказы & повести

Б рассказы | повести

Г рассказы | повести | Толстой

А рассказы | повести | Толстой | Чехов

Объяснение:

Чем больше & (И) тем меньше страниц будет найдено

Чем больше | (ИЛИ) тем больше страниц будет найдено

4,6(15 оценок)
Открыть все ответы
Ответ:
annushkan0
annushkan0
13.02.2021
// PascalABC.NET 3.1, сборка 1179 от 29.02.2016
procedure GetProdNeg(a:array of integer; var p:real);
// произведение отрицательных элементов
begin
  p:=a.Where(x->x<0).Aggregate(1.0,(p,e)->p*e)
end;

function IsPrime(n:integer):boolean:=
  Range(2,Round(sqrt(n))).All(i->n mod i<>0);

procedure ArrPrime(n:integer; var a:array of integer);
// массив простых чисел не больших n
begin
  a:=Range(2,n).Where(i->IsPrime(i)).ToArray
end;

begin
  var n:=ReadInteger('n=');
  var a:=ArrRandom(n,-50,50); a.Println;
  var r:real;
  GetProdNeg(a,r);
  Writeln('Произведение ',r);
  n:=ReadInteger('n=');
  var b:array of integer;
  ArrPrime(n,b);
  b.Println
end.

Тестовое решение:
n= 15
27 -7 -36 40 -15 -21 -47 -28 -12 45 3 -38 -15 1 -39
Произведение 27866837980800
n= 300
2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79 83 89 97 101 103 107 109 113 127 131 137 139 149 151 157 163 167 173 179 181 191 193 197 199 211 223 227 229 233 239 241 251 257 263 269 271 277 281 283 293
4,5(71 оценок)
Ответ:
mikreaz
mikreaz
13.02.2021
// PascalABC.NET 3.1, сборка 1179 от 29.02.2016
procedure GetProdNeg(a:array of integer; var p:real);
// произведение отрицательных элементов
begin
  p:=a.Where(x->x<0).Aggregate(1.0,(p,e)->p*e)
end;

function IsPrime(n:integer):boolean:=
  Range(2,Round(sqrt(n))).All(i->n mod i<>0);

procedure ArrPrime(n:integer; var a:array of integer);
// массив простых чисел не больших n
begin
  a:=Range(2,n).Where(i->IsPrime(i)).ToArray
end;

begin
  var n:=ReadInteger('n=');
  var a:=ArrRandom(n,-50,50); a.Println;
  var r:real;
  GetProdNeg(a,r);
  Writeln('Произведение ',r);
  n:=ReadInteger('n=');
  var b:array of integer;
  ArrPrime(n,b);
  b.Println
end.

Тестовое решение:
n= 15
27 -7 -36 40 -15 -21 -47 -28 -12 45 3 -38 -15 1 -39
Произведение 27866837980800
n= 300
2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79 83 89 97 101 103 107 109 113 127 131 137 139 149 151 157 163 167 173 179 181 191 193 197 199 211 223 227 229 233 239 241 251 257 263 269 271 277 281 283 293
4,8(51 оценок)
Это интересно:
О
Как правильно закончить официальное письмо: советы экспертов...
С
Хранение духов: как сохранить свой любимый аромат на долгое время...
К
Как использовать команду установки воспроизведения атрибутов файлов для обнаружения вирусов?...
С
Как прекратить воевать со своим братом или сестрой...
Х
Как поместить яйцо в бутылку: советы и хитрости...
Ф
Как использовать дебетовую карту PayPal: подробная инструкция...
И
Секреты создания поддельного беременного живота...
18.02.2020
10 методов, которые помогут забыть плохое воспоминание...
П
Маисовый полоз: как ухаживать и предотвратить возникновение проблем...
Ф
Как сделать цицит: открытие тайного рецепта...
Новые ответы от MOGZ: Информатика
Ani32536
Ani32536
27.04.2023
Написать лабораторные по информатике...
kadochkina061
kadochkina061
18.01.2021
Написать на паскале программу нахождения суммы, произведения и среднего значения элементов массива, кол-во элементов ввести в программе....
lululu4
lululu4
12.08.2020
Как программируется на паскале ветвление?...
luciatarasova
luciatarasova
12.08.2020
4.какой результат буден получен, если в качестве исходных значений а, в и с ввести, соответственно 5, 7 и 9? program zadacha; var a, b, c, d: integer; begin writeln (‘введите через...
katrinvar
katrinvar
12.08.2020
Какие данные вы бы включили в информационные модели: 1) обед в школьной столовой 2) ремонт квартиры 3) пассажир поезда 4) дом, в котором ты живешь...
kirill5761
kirill5761
12.08.2020
Составить программу, отгадывающее натуральное чётное число, загаданное пользователем. ниже представлен рекомендуемый диалог во время работы программы: загадайте натуральное чётное...
zka20zka20
zka20zka20
12.08.2020
1. написать программу. условие : написать программу вывода на экран лесенкой трех последовательно идущих трехзначных чисел. первое число вводит пользователь, остальные вычисляются...
MiYaG11
MiYaG11
10.11.2020
Идёт k-я секунда суток. определить, сколько полных часов (h) и полных минут к этому моменту....
akrasnoplakhtyc
akrasnoplakhtyc
10.11.2020
Дано расстояние в метрах. найти число полных километров в нём....
Вика310387
Вика310387
10.11.2020
Pascal дан массив вещественных чисел. найти сумму и количество отрицательных с нечетными номерами элементов, расположенных в первой половине массива (включая середину) ограничения:...

MOGZ ответил

Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ Оформи подписку
О НАС
ПОМОЩЬ
App
.
.
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ