Напечатать тот массив, в котором больше отрицательных элементов

@Xelp me · Регистрация: 25.03.2017

Студворк — интернет-сервис помощи студентам

Дано: массивы А(10),В(15).Напечатать тот массив,в ко ором больше отрицательных массивов.Количество ка
отрицательных элементов массива находить в программе.

@Puporev · 24.04.2017, 14:35

Сообщение от Xelp me

Напечатать тот массив,в ко ором больше отрицательных массивов.Количество ка

Текст задания угрожающий...

@Xelp me · 25.04.2017, 10:58 **[ТС]**

Дано: массивы А(10),В(15).Напечатать тот массив,в ко ором больше отрицательных элементов .Количество ка
отрицательных элементов массива находить в программе.
Так правильней

@Puporev · 25.04.2017, 11:01

Сообщение от Xelp me

Так правильней

Особенно это

Сообщение от Xelp me

.Количество ка

Количество какашек что ли?

magirus · 25.04.2017, 11:02

разницы не вижу.

@Xelp me · 25.04.2017, 11:06 **[ТС]**

Дано: массивы А(10),В(15).Напечатать тот массив,в ко ором больше отрицательных элементов .Количество
отрицательных элементов массива находить в программе.
Лучше

?

@ZX Spectrum-128 · 25.04.2017, 13:24

Pascal
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
40
41
const
  n = 10;
  m = 15;
 
var
  i, c1, c2: integer;
  a: array[1..n] of integer;
  b: array[1..m] of integer;
 
procedure count(x: array of integer; var c1: integer);
var
  i: integer;
begin
  c1 := 0;
  for i := 0 to high(x) do
    if x[i] < 0 then
      inc(c1);
end;
 
begin
  randomize;
  writeln('Array A:');
  for i := 1 to n do
  begin
    a[i] := -n div 2 + random(n);
    write(a[i]:4);
  end;
  writeln;
  writeln('Array B:');
  for i := 1 to m do
  begin
    b[i] := -m div 2 + random(m);
    write(b[i]:4);
  end;
  writeln;
 
  count(a, c1);
  count(b, c2);
  writeln('Количество отрицательных элементов массива A: ',c1);
  writeln('Количество отрицательных элементов массива B: ',c2);
end.

magirus · 25.04.2017, 13:43

Не по теме:

с третьей попытки удалось

@Xelp me · 30.04.2017, 17:54 **[ТС]**

Понимаю, что поздно, но можете блок схему скинуть?

Новые блоги и статьи Все статьи Все блоги /
Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .	Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизита табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .
wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/	Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .	Вывод данных в справочнике через динамический список Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .	Программное заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .

@Xelp me 0 / 0 / 0 Регистрация: 25.03.2017 Сообщений: 9

	Напечатать тот массив, в котором больше отрицательных элементов 24.04.2017, 13:55. Показов 1450. Ответов 8 Метки нет (Все метки) Дано: массивы А(10),В(15).Напечатать тот массив,в ко ором больше отрицательных массивов.Количество ка отрицательных элементов массива находить в программе. 0

@Xelp me 0 / 0 / 0 Регистрация: 25.03.2017 Сообщений: 9
	25.04.2017, 10:58 [ТС]
	Дано: массивы А(10),В(15).Напечатать тот массив,в ко ором больше отрицательных элементов .Количество ка отрицательных элементов массива находить в программе. Так правильней 0

magirus Почетный модератор 28049 / 15785 / 983 Регистрация: 15.09.2009 Сообщений: 67,752 Записей в блоге: 78
	25.04.2017, 11:02
	разницы не вижу. 0

@Xelp me 0 / 0 / 0 Регистрация: 25.03.2017 Сообщений: 9
	25.04.2017, 11:06 [ТС]
	Дано: массивы А(10),В(15).Напечатать тот массив,в ко ором больше отрицательных элементов .Количество отрицательных элементов массива находить в программе. Лучше ? 0

magirus
	25.04.2017, 13:43
	Не по теме: с третьей попытки удалось 0

@Xelp me 0 / 0 / 0 Регистрация: 25.03.2017 Сообщений: 9
	30.04.2017, 17:54 [ТС]
	Понимаю, что поздно, но можете блок схему скинуть? 0

Напечатать тот массив, в котором больше отрицательных элементов

Решение