0 / 0 / 0
Регистрация: 19.01.2018
Сообщений: 15
1

Вычислить значение выражения, используя процедуру

15.02.2018, 06:21. Показов 1544. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Помогите пожалуйста.

Вычислить, используя подпрограмму-процедуру
Z=(s1+s2+s3)/(k1*k2*k3)
где s1 и k1 – сумма и количество четных элементов массива N [1..12];
s2 и k2 – сумма и количество четных элементов массива М [1..10]
s3 и k3 – сумма и количество четных элементов массива А [1..8]
0
Лучшие ответы (1)
15.02.2018, 06:21
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
15.02.2018, 06:21
Ответы с готовыми решениями:

Вычислить значение выражения, используя функцию
Вычислить значение выражения, используя функцию: Y=\left(\frac{\sqrt{\sin ^2\left( \frac{1}{x}\right)+1}}{1+x^2} \right)+\sin...

Вычислить значение выражения, используя циклы
Доброго времени суток. Вот собственно выражение: ...

Используя функцию, вычислить значение выражения
Используя функцию вычислить:

1
Эксперт Pascal/Delphi
6811 / 4568 / 4819
Регистрация: 05.06.2014
Сообщений: 22,438
15.02.2018, 08:05 2
Лучший ответ Сообщение было отмечено RoMeOkhv как решение

Решение

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
42
43
44
45
46
type
  vector = array [1..100] of integer;
 
var
  A, B, C: vector;
  i, n, k1, k2, k3, s1, s2, s3: integer;
  z: real;
 
procedure CountVector(x: vector; k: integer; var sum, col: integer);
var
  i: integer;
begin
  sum := 0;
  col := 0;
  for i := 1 to k do
  begin
    x[i] := random(31) - 15;
    write(x[i]:4);
    if x[i] mod 2 = 0 then
    begin
      sum := sum + x[i];
      inc(col);
    end;
  end;
end;
 
begin
  randomize;
  writeln('Массив А.');
  CountVector(a, 12, s1, k1);
  writeln;
  writeln('Массив А. Сумма чётных: ', s1);
  writeln('Массив А. Количество чётных: ', k1);
  writeln('Массив B.');
  CountVector(b, 10, s2, k2);
  writeln;
  writeln('Массив B. Сумма чётных: ', s2);
  writeln('Массив B. Количество чётных: ', k2);
  writeln('Массив C.');
  CountVector(c, 8, s3, k3);
  writeln;
  writeln('Массив C. Сумма чётных: ', s3);
  writeln('Массив C. Количество чётных: ', k3);
  Z := (s1 + s2 + s3) / (k1 * k2 * k3);
  writeln('Z: ', z);
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
15.02.2018, 08:05
Помогаю со студенческими работами здесь

Вычислить значение выражения, используя функции
Даны переменные k, m. Вычислить значение выражения,z=a(k)+√a(m)+b(k,m) Где a (x) и b (x, y) функции, заданные...

Вычислить значение выражения, используя функцию
Даны действительные числа a, b, c. Вычислить: \frac{\max(a,\,a+b)+\max(a,\,b+c)}{1+\max(a+bc,\,b-c,\,25)}

Вычислить значение выражения, используя цикл
Помогите решить вторую задачу на цикл. (x-2)(x-4)(x-8)...(x-64)

Используя элементы матрицы, вычислить значение выражения
Пусть дана вещественная квадратная матрица порядка n. Получите x1xn+x2xn-1+...+xnx1. где xi - наибольшее значение i-й строки данной матрицы

Вычислить значение выражения, используя рекурсивную подпрограмму
Составить программу, которая, используя рекурсивную функцию или процедуру, находит значение данной функции для любых целых...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему

Редактор формул (кликните на картинку в правом углу, чтобы закрыть)
Опции темы

Новые блоги и статьи
Ключевые слова Python
hw_wired 15.02.2025
Ключевые слова в Python - это специальные зарезервированные слова, которые имеют особое значение и функции в языке. В настоящее время Python включает 35 ключевых слов и 4 мягких ключевых слова. Эти. . .
Отличия изменяемых и неизменяемых типов в Python
hw_wired 15.02.2025
В Python существует принципиальное различие между изменяемыми (mutable) и неизменяемыми (immutable) типами данных, которое оказывает существенное влияние на работу программ. Это различие часто. . .
Python: сравнение списков и кортежей
hw_wired 15.02.2025
В Python последовательности являются одними из самых важных и часто используемых типов данных. Они позволяют хранить упорядоченные наборы элементов, к которым можно обращаться по индексу. Среди всех. . .
Как скачивать файлы с URL с помощью Python
hw_wired 15.02.2025
Для скачивания файлов Python предлагает как встроенные средства, так и сторонние библиотеки. Встроенный модуль urllib из стандартной библиотеки обеспечивает базовую функциональность для работы с URL. . .
Использование SQLAlchemy в Python
hw_wired 15.02.2025
SQLAlchemy - мощная библиотека для работы с базами данных в Python, которая предоставляет полноценный набор средств для объектно-реляционного отображения (ORM) и обширные возможности для работы с. . .
Взаимодействие с REST API в Python
hw_wired 15.02.2025
В современном мире разработки программного обеспечения REST API стал неотъемлемой частью архитектуры веб-приложений. API (Application Programming Interface) - это набор правил и протоколов,. . .
Разделение строк в Python
hw_wired 15.02.2025
Python предлагает богатый набор возможностей для работы со строками, и среди них разделение строк занимает особое место. Этот процесс позволяет разбивать текст на отдельные компоненты, что критично. . .
Объединение строк в Python
hw_wired 15.02.2025
При работе с текстовыми данными в Python нередко возникает необходимость объединять несколько строк в одну. Это может потребоваться при форматировании вывода, обработке текстовых файлов или создании. . .
Лучшие игровые движки на Python
hw_wired 15.02.2025
В последнее время разработка игр стала одним из самых популярных направлений программирования, и Python не остался в стороне от этого тренда. Несмотря на то, что Python обычно не ассоциируется с. . .
Декоратор jit в Python
hw_wired 15.02.2025
Если вы достаточно долго изучаете программы и пакеты на Python для машинного обучения, то наверняка замечали, что паттерн "JIT-декоратор" довольно популярен. Этот подход позволяет превратить обычные. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru