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

Обработка массива (построить новую «сглаженную» матрицу, значения каждого элемента которой являются:) - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Сортировка массива http://www.cyberforum.ru/cpp-beginners/thread816098.html
Здравствуйте. Как отсортировать элементы массива от меньшего к большему?
C++ Разность между максимальным и минимальным значением произвольной функции одного переменного здравствуйте не могу правильно составить задачу пожалуйста помогите Написать функцию пользователя, позволяющую находить разность между максимальным и минимальным значением произвольной функции... http://www.cyberforum.ru/cpp-beginners/thread816065.html
Структура C++
Распечатать фамилии рабочих бригады, начинающиеся с букв А и С, с указанием их месячной зарплаты. #include <iostream> #include <vcl.h> using namespace std; struct list { char LastName; int...
C++ Процедуры и функции: Рассчитать сумму и произведение значений элементов произвольной строки двухмерного массива.
Ввести двумерный массив размерностью 5х6. Рассчитать в одной функции сумму и произведение значений элементов произвольной строки двухмерного массива. Написать функцию умножения элементов...
C++ посоветуйте - сложный ли код http://www.cyberforum.ru/cpp-beginners/thread816029.html
Допустим имеем текстовый файл .txt необходимо просчитать сколько существует пар слов в тексте, таких, что 1 слово из пары начинается с согласной, второе слово из пары начинается с гласной. ...
C++ Сравнение массивов типа Char У меня есть структура. Мне нужно проверит, (sportsmens.Sport=="swimming"); sportsmens.Sport - массив типа char подробнее

Показать сообщение отдельно
Андрей 94
19 / 19 / 1
Регистрация: 11.11.2012
Сообщений: 253
29.03.2013, 08: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
38
39
uses crt;
const nmax=15;
var a,b:array[1..nmax,1..nmax] of real;
    m,n,i,j:byte;
    s:real;
begin
clrscr;
randomize;
repeat
write('Êîëè÷åñòâî ñòðîê îò 3 äî ',nmax,' m=');
readln(m);
until m in [3..nmax];
repeat
write('Êîëè÷åñòâî ñòîëáöîâ äî ',nmax,' n=');
readln(n);
until n in [1..nmax];
writeln('ÈñõîäГ*Г*Гї Г¬Г*òðèöГ*:');
for i:=1 to m do
 begin
  for j:=1 to n do
   begin
    a[i,j]:=9*random;
    write(a[i,j]:5:2);
   end;
  writeln;
 end;
writeln('ÑãëГ*æåГ*Г*Г*Гї Г¬Г*òðèöГ*:');
for i:=1 to m do
 begin
  for j:=1 to n do
   begin
    if i in [1,m] then b[i,j]:=a[i,j]
    else b[i,j]:=(a[i-1,j]+a[i+1,j]-a[i,j])/3;
    write(b[i,j]:5:2);
   end;
  writeln
 end;
readln
end.
Вот даная программа на паскале только перевести помогите на си
0
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.