const
ns=20;
var a:array[1..ns,1..ns] of integer;
m,n,i,j:byte;
min,sum:integer;
begin
randomize;
readln(m,n);
writeln('Исходная матрица:');
for i:=1 to m do
begin
for j:=1 to n do
begin
a[i,j]:=random(20);
write(a[i,j]:3);
end;
writeln;
end;
writeln('Минимальные элементы столбцов:');
sum:=0;
for j:=1 to n do
begin
min:=a[1,j];
for i:=1 to m do
if a[i,j]<min then
min:=a[i,j];
sum:=sum+min;
writeln(j,' - ',min:2);
end;
writeln('Сумма минимальных элементов: ',sum);
end.
Товар это все то што можно продать, продать можно то што хотят купить.
Информация это в том числе знания.
Знание как сделать то или другое, формулы сплавов стали, пропорции градиентов в еде или лекарствах, методы добывания ископаемых, методы очистки. Бесспорно все это можно продать и стоит порой больших денег, потому что на них можно заработать еще больше денег
Это один из примеров
Учеба стоит не дешево, а это ничто иное как процесс получения и усвоения знаний/информации
Стратегические потому <span>ч</span>то на основе информации строится стратегия дальнейших действий
1 задача:
program znan1;
uses crt;
var a:char;
begin
clrscr;
readln(a);
while a<>'.' do
begin
writeln(ord(a));
readln(a);
end;
<span>end.
2 задача:
program znan2;
uses crt;
var i,j:integer;
begin
for i:=1 to 16 do
begin
for j:=1 to 8 do
begin
write((i*j-1):5,'-',chr(i*j-1));
end;
writeln;
end;
readln;
<span>end.</span></span>
Чтобы:звонить родным,общаться,играть в мобильные игры,читать новости,проверять информацию