Информация - это сообщение о чем либо ( пр-р о состоянии чего либо)
Знак - метка, которой отображается что либо
Дискритизация - преобразование непрерывной функции
Компьютер - это электронно-вычислительная машина (ЭВМ)
Память - Способность сохранять и воспроизводить что либо<span>
Интернет - всемирный сетевой ресурс (компьютерная сеть)
Фаил - организационная структура данных, которая распознается компом как единое целое
Интерфейс - общая граница между 2-мя функциональными объектами</span>
Const
n = 10;
m = 10;
var i, j, column, row, sum_column, sum_row: integer;
arr: array [1..n,1..m] of integer;
begin
for i :=1 to n do
begin
for j:=1 to m do
begin
arr[i,j]:= random()*10;
end;
end;
readln(row);
readln(column);
sum_column:= 0;
sum_row := 0;
for i:=1 to n do
begin
sum_row := sum_row + arr[i,row];
end;
for j:=1 to m do
begin
sum_column := sum_column + arr[column, j];
end;
writeln(sum_column);
writeln(sum_row);
end.
Не проверено. Написал сходу в окне.
1111101(2), или можно в десетичную перевести обу цифр и потом сложить и дальше перевести на двоичную, 1111000=120, 101=5, 120+5=125, 125=1111101.
Ответ: 2.
div - целое число от деления.
mod - остаток от деления.
1) 1000 div 5 = 1000/5 = 200.
2) 200 mod 3 = 200/3 = 2.
Var i,n,k:integer;
a:array[1..12] of integer;
begin
write('Write k: '); readln(k);
for i:=1 to 12 do
begin
a[i]:=Random(70)-10;
write(a[i]:5);
end;
writeln;
for i:=1 to 12 do
If a[i] mod k=0
then write(k:3,a[i])
else write(a[i]:5);
readln
end.