Прикладное программное обеспечение- это программы,которые непосредственно удовлетворяют информационные потребности ( т.е. А)
1.
var f:integer;
begin
read(f);
if f mod 2<>0 then
f:=6*f
else
f:=f+29;
writeln(f);
<span>end.
2.
var i,n,k:integer;
begin
read(n);
k:=1;
for i:=2 to n do
k:=k*i;
writeln(k);
<span>end.</span></span>
var a: integer;
procedure row(n:integer);
begin
if n>=1 then begin
write (n, ' ');
row(n-1)
end;
end;
begin
readln(a);
row(a);
end.
Ну так как чисел z автор нам не сказал выберем любое, например, 1111
Хром жрет переносы - сейчас исправлю
\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
#include <iostream>
using namespace std;
int main() {
setlocale(LC_ALL, "Russian");
int N; cin >> N;
int **arr = new int*[N];
for (int i = 0; i < N; i++) {
arr[i] = new int[N];
for (int j = 0; j < N; j++)
cin >> arr[i][j];
}
int mem = 0;
for (int i = 1; i < N; ++i)
if (arr[mem][N - 1 - mem] > arr[i][N - 1 - i])
mem = i; cout << mem + 1 << " " << N - mem << endl;
system("pause");
return 0;
}