1)
500 кбайт вес * 1024 * 8 = 4096000 бит вес.
4096000 бит вес / 128000 бит сек = 32 сек.
2)
256000 бит сек * (2 мин * 60 сек в мин) сек = 30720000 бит вес / 8 / 1024 = 3750 кбайт вес.
3)
3000 кбайт вес * 1024 * 8 / (5 мин * 60) = 81920 бит сек.
Program prog;
uses crt;
var a,b,c,x,y:real;
begin
clrscr;
write('Ребро параллелепипеда а = ');
readln(a);
write('Ребро параллелепипеда b = ');
readln(b);
write('Ребро параллелепипеда c = ');
readln(c);
writeln;
write('Сторона отверстия х = ');
readln(x);
write('Сторона отверстия y = ');
readln(y);
writeln;
if ((a<x) and (b<y)) or
((a<x) and (c<y)) or
((c<x) and (b<y)) or
((b<x) and (a<y)) or
((c<x) and (a<y)) or
((b<x) and (c<y)) then
writeln('Может пройти') else writeln('Не может пройти');
end.
1) присвоения :=
2)
3
4
3,5
3) 1
a=2 b=5
var a,x,x1,x2,x3:integer;
Begin
read(a);
writeln('4. s=',4*a);
read(x);
x3:=x mod 10;
x1:=x div 10;
writeln('5. x=',x3*100+x1);
End.