Подозреваю, что вариант №2
в секунду передается 512Кбит=512/8Кбайт=64Кбайт
за четыре минуты передалось 4*60*64=15360Кбайт
в одном Мбайте 1024 Кбайт ⇒15360Кбайт=15360/1024Мбайт=15мегабайт
Ответ: 15 мегабайт
Var
z,m,n:real;
begin
writeln('vvedite M: ');readln(m);
writeln('vvedite N: ');readln(n);
z:=m-n;
z:=z*2;
writeln(z);
readln;
end.
Судя по логике только 1-минимальный,уточни задание
Program sinys;
var m,i:integer;x:real;mas:array [1..1000] of integer;
begin
x:=0;
readln(m);
for i:=1 to m do
x:=x+(1/sin(i));
writeln(x)
end.