450*60*80*1 байт = 2160000 байт
2160000 байт /1024 = 2109,37 Кбайт / 1024 = 2,05 Мбайт
Ответ: Непоместится
<span>If (a>=10) and (a<=99)
then begin
writeln (a,'-двузначное число');
writeln ('его квадрат=', sqr(a));
end
else (a,' не является двузначным числом');</span>
Program n1;
type z= array of integer;
var a:z;
d,n,i,j,x: integer;
begin
n:=0;
while true do
begin
readln(d);
if d=0 then break;
n:=n+1;
setlength(a,n);
a[n-1]:=d;
end;
for i:=0 to n-2 do
for j:=i+1 to n-1 do
if a[i]<a[j] then begin
x:=a[i];
a[i]:=a[j];
a[j]:=x;
end;
writeln(a[1]);
end.
Определим время передачи.
2048 бит/с = 256 байт/с = 0,25 Кб/с
128/0,25=128*4= 512с
Т.е. Файл передается 512с. Теперь узнаем новую скорость.
72/512= 0,140625 Кб/с = 144байт/с
Ответ:
144 байт/с