Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Дикий_псих
0 / 0 / 0
Регистрация: 02.12.2015
Сообщений: 1
1

Массив: Для матрицы B (12;12) найти сумму элементов в строках матрицы

02.12.2015, 20:57. Просмотров 161. Ответов 1
Метки нет (Все метки)

Для матрицы B (12;12) найти сумму элементов в строках матрицы. f(x)=1-x+sinx-1. x принадлежит [0;5]. когда запускаю программу показывает очень много s=
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
program lab4;
uses crt;
var C: array[1..12 , 1..12] of real;
    x,s:real;
    i,j:integer;
  begin
  clrscr;
  s:=0;
  randomize;
  for j:=1 to 12 do
      begin for i:=1 to 12 do
            begin 
            C[i,j]:=5*random;
            x:=(1-x+sin(x)-ln(1-x));
            s:=s+C[i,j];
            end;
      writeln ('s=', s:8:4);
      end;
for j:=1 to 12 do
    begin
    for i:= 1 to 12 do
    write('  ', C[i,j]:5:2, '  ');
    writeln;
    end;
readln;
end.
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
02.12.2015, 20:57
Ответы с готовыми решениями:

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

Найти сумму элементов, количество четных и нечетных элементов, а также максимальный элемент в строках матрицы
7 Найти сумму элементов, количество четных и нечетных элементов, а также...

Найти среднее арифметическое элементов матрицы и сумму элементов тех строк матрицы, в которых отрицателен элемент главной диагонали
Найти среднее арифметическое элементов матрицы и сумму элементов тех строк...

В строках матрицы с отрицательным элементом на главной диагонали найдите сумму элементов и наибольший из элементов
Пусть дана вещественная квадратная матрица порядка n. В строках с отрицательным...

Найти сумму элементов 1-ого столбца матрицы, заменить ею последнюю строку матрицы
Ввести матрицу A(N,N).Найти сумму элементов 1-ого столбца матрицы заменить ею...

1
DoctorCrazy
2 / 2 / 6
Регистрация: 27.05.2010
Сообщений: 45
03.12.2015, 10:26 2
Добавлено через 40 минут
Дикий_псих, вот задача
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
program lab4;
uses crt;
var B: array[1..10 , 1..20] of real;
x,y,s:real;
i,j,n,m:integer;
 
begin
clrscr;
writeln ('Vvedite razmer matr n,m ');
readln(n,m);
writeln (' Vvedite elementy matr B: ');
for i:=1 to n do
  for j:=1 to m do
  readln (B[i,j]);
  writeln ('Ishodnaja matrica B');
  for i:=1 to n do
  begin
    for j:=1 to m do
    write (B[i,j]:6);
    writeln;
  end;
for i:=1 to n do
 begin
   s:=0;
   for j:=1 to m do
   s:=s+b[i,j];
   writeln('Сумма в строке ',i,' = ',s);
   x:=s;
   if (x>=0) and (x<=5) then
   begin
   y:=(1-x+sin(x)-1);  ///ФОРМУЛУ ПРОВЕРЬ и ПОДСТАВЬ САМ КАКУЮ НАДО.
  writeln('F(x) =', y:6:3);
  end
  else
writeln('Сумма строки превышает интервал [0,5]');
end;
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
03.12.2015, 10:26

Найти сумму строк матрицы, среднее значение элементов матрицы и минимальный элемент
Сумма строк (сделать это все в Паскаль) Задана двумерная матрица размером...

Даны матрицы А(4,3) и В(3,5). Для каждой матрицы вычислить сумму элементов над главной диагональю
Даны матрицы А(4,3) и В(3,5). Для каждой матрицы вычислить сумму элементов над...

Найти произведение элементов в тех строках матрицы, которые не содержат отрицательных элементов
Дана целочисленная квадратная матрица. Определить: 1. Произведение элементов в...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru