Стандартно - система (Ваш ПК), т.е. представим, что вы создали папку - ее имя и будет обозначено, как "новая папка", "новая папка1" и т.д. Точно так же со всеми остальными файлами: у текстового документа (блокнот) и будет имя "Текстовый документ".
Не стандартно - Вы. Вы можете изменять имя как угодно, используя допустимые символы.
Var
matrix :array[1..4, 1..4] of integer;
min, sum, i, j :integer;
begin
min := maxint;
sum := 0;
for i:=1 to 4 do
for j:=1 to 4 do
read(matrix[i, j]);
for i:=1 to 4 do
for j:=1 to 4 do
begin
if matrix[i, j] < min then
min := matrix[i, j];
sum := sum + matrix[i, j];
end;
for i:=1 to 4 do
for j:=1 to 4 do
if matrix[i, j] < (sum / 16) then
matrix[i, j] := min;
end.
Вроде так. дальше протяжку сделайте и все
Не указано на каком языке программирования нужно, поэтому напишу уж на Паскале. Всё сделал так, чтобы было понятно, хоть и не так компактно.
Var x, y, z:integer;
Begin
Write('Введите числа X, Y и Z^: ');
Readln(x, y, z);
If x mod 5=0 then x:=x+1;
If y mod 5=0 then y:=y+1;
If z mod 5=0 then z:=z+1;
Writeln('Полученные в итоге числа(X, Y, Z):', x, ', ', y, ', ', z);
End.