После чистки жёсткого диска объёмом 256Гб размер занятого пространства сократился вдвое. При этом объём свободного пространства стал равен 90 Гб. Какой объём занятого пространства (в Гб) был до очистки?
Скорость передачи данных, предоставляемая интернет-провайдером, составляет 70 Мбит/сек. За сколько секунд будет передана фотография размером 5 Мбайт?

program p;

vara,b,c,i,j,n : integer;

beginwriteln('введите три числа'); readln(a,b,c);

if a> b then if a> c then writeln(a,c,b) else writeln(c,a,b) else if c> b then writeln(a,b,c) else writeln(b,c,a);  

readln; end. 

uses crt; var n,i: integer; a: array[1..1000] of integer; beginread(n); for i: =1 to n do read(a[i]); for i: =1 to n do beginif a[i]< 0 then a[i]: =abs(a[i]); for i: =1 to n do write(a[i],' '); end.