Разработать программу на языке программирования turbo pascal: а) даны два массива х(12) и у(10). в массиве у все нулевые элементы заменить средним арифметическим элементов массива х. б) отчет содержит n позиций с указанием величины и знака . распечатать вначале значения всех положительных , а затем значения всех отрицательных .
var
c, a: array[1..20] of integer;
i: integer;
begin
write('Первый массив ');
for i := 1 to 20 do begin
c[i] := i * (-5);
write(c[i], ' ');
end;
writeln;
write('Преобразованный массив ');
for i := 1 to 20 do begin
a[i] := c[20 - i + 1];
write(a[i], ' ');
end;
end.
ИЛИ Программа не использующая два массива, а просто переворачивающая первый
var
c: array[1..20] of integer;
i: integer;
begin write('Первый массив ');
for i := 1 to 20 do begin
c[i] := i * (-5);
write(c[i], ' ');
end;
writeln;
write('Преобразованный массив ');
for i := 20 downto 1 do write(c[i], ' ');
end.
Обе программы работают!
Стохастическая матрица - это матрица, в которой сумма элементов всех строк или всех столбцов равна 1 (для стохастичности достаточно хотя бы одного, строк или столбцов). Такие матрицы часто используются, например, в теории вероятности.
Напишите программу, которая проверяет, является ли матрица стохастической.
На вход программы подается два натуральных числа, N и M, через пробел, далее N строк по M целых чисел через пробел - значения вашей матрицы. Нужно напечатать “стохастическая” или “не стохастическая”
в написании контрольных, курсовых и дипломных работ здесь