Форум программистов, компьютерный форум, киберфорум
Наши страницы

работа с массивами - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ дайте предстовления о ИИ http://www.cyberforum.ru/cpp-beginners/thread333878.html
Дайте пожалуйста представления о ии(любом хоть для крестиков ноликов)что бы иметь представления о нём
C++ массив целых чисел помогите кто сделать пожалуйста Дан массив целых чисел. Рассмотреть отрезки массива(группы идущих подряд чисел), состоящие из нечетных чисел. Получить наибольшую из длин рассматриваемых отрезков.... http://www.cyberforum.ru/cpp-beginners/thread333867.html
C++ Центрирование - расположение строки s1 посередине строки s2 длины L.
Центрирование - расположение строки s1 посередине строки s2 длины L. Свободные символы заполнить пробелы. Функция должна иметь вид void Center (L, s1, s2). Нельзя использовать библиотеку <string.h>...
C++ Как перейти в начало текстового файла?
Какую строку добавить в код, чтоб перейти в начало файла? while (fin.get(ch)) { if (isdigit(ch)) ++num; }
C++ Округление дробового числа http://www.cyberforum.ru/cpp-beginners/thread333852.html
Здраствуйте . Нужно написать программку. У пользователя должны спросить какое число ввести надо, к примеру он введет 1.234567. Потом у пользователя спрашивают сколько оставить чисел, если 3 то должно...
C++ Программирование на языке C++ Известны данные о мощности двигателей(в л.с.) и стоимость 30 легковых автомобилей. Определить общую стоимость автомобилей, у которых мощность двигателя превыщает 100 л.с. подробнее

Показать сообщение отдельно
катюха
2 / 2 / 1
Регистрация: 05.07.2011
Сообщений: 26

работа с массивами - C++

17.07.2011, 20:55. Просмотров 355. Ответов 0
Метки (Все метки)

перевести на си!!!!!!!
Работа с массивами. Дана действительная квадратная матрица порядка n.Вычислить сумму тех из ее элементов,расположенных на побочной диагонали и выше нее,которые превосходят по величине все элементы,расположенные ниже побочной диагонали.Е
сли на побочной диагонали и выше нее нет элементов с указанным свойством,то ответом должно служить сообщение об этом.
Текст программы на паскаль:
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
Program sum;
 uses crt;
 const nmax=20;
 var a:array[1..nmax,1..nmax] of real;
 n,i,j,k:integer;
 s,mx:real;
 begin
 clrscr;
 randomize;
 repeat
 write('Размер матрицы ',nmax,' n=');
 readln(n);
 until n in [1..nmax];
 writeln('Матрица A:');
 for i:=1 to n do
 begin
 for j:=1 to n do
 begin
 a[i,j]:=10*random;
 write(a[i,j]:5:2);
 end;
 writeln;
 end;
 writeln;
 mx:=a[2,n];
 for i:=2 to n do
 for j:=n-i+2 to n do
 if a[i,j]>mx then mx:=a[i,j];
 writeln('Максимальный элемент ниже побочной диагонали=',mx:0:2);
 s:=0;
 for i:=1 to n-1 do
 for j:=1 to n-i+1 do
 if a[i,j]>mx then
 begin
 k:=1;
 s:=s+a[i,j];
 end;
 if k=0 then write('Выше побочной и на ней нет элементов больше ',mx:0:2)
 else write('Сумма элементов выше побочной и на ней и больших ',mx:0:2,'=',s:0:2);
 readln
 end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru