1) Переведем скорость в кб/с. 2 621 440 бит/с=320 кб/с
Файл размером 10 Мб или 10240 Кб будет передаваться 32 секунды
2)Переведем скорость 256 000 бит/с=32 кб/с
10 мин=600 с. Значит наибольший файл будет иметь размер 19200 Кб
3)Не знаю
в растровом изображении хранится информация о каждом пиксиле (точки, из которых складывается изображение). Информация включает в себя кординаты пикселей и их цвет.
Поэтому при работе с растровыми изображениями можно сделать плавные и красивые переходы цветов, всякие цветовые эффекты и так далее...
векторные же изображения - по сути информация о форме и размеров объектов, причем геометрических.
характерно то, что векторные объекты можно увеличивать без потери качества. растровые - нет.
Var
i,j:integer;
a:array[1..12,1..10]of integer;
begin
writeln ('Исходная таблица: ');
for i:=1 to 12 do
begin
for j:=1 to 10 do
begin
a[i,j]:=50+random(10);
write(a[i,j]:3);
end;
writeln;
end;
writeln;
for i:=5 to 12 do
for j:=1 to 10 do
a[i-1,j]:=a[i,j];
for j:=1 to 10 do a[12,j]:=0;
writeln ('Измененная таблица: ');
for i:=1 to 11 do
begin
for j:=1 to 10 do
write(a[i,j]:3);
writeln;
end;
<span>end.</span>
Procedure factorize(n: longint);
var divisor: longint;
begin
divisor := 2;
while divisor * divisor <= n do
if n mod divisor = 0 then
begin
n := n div divisor;
writeln(divisor);
end
else inc(divisor);
if n <> 1 then writeln(n);
end;
var n: longint;
begin
readln(n);
factorize(n);
end.