Запишем условие в 10-ном коде:
х(10)+2738-2584=138, х(10)=-16(10), двоичное отрицательное число в дополнительном коде х(2)=10000(2)
var a:integer;
begin
readln (a);
if (a>0) then
repeat
a:=a-3;
until(a<0);
if (b<0) then
repeat
a:=a+2;
until (a>70);
writeln (a);
end.
(t - время передачи, I - объем данных, v - скорость передачи)
Дано:
t = 4 c
v = 256000 бит/с
I - ?
Решение:
бит
1024000.0 бит = 128000.0 байт = 125.0 Кбайт
Javascript:s=prompt();alert(s.replace(",",""));
//Дам блок-схему и код на Паскале
//Pascal ABC.NET v3.0 сборка 1111
var
r,v,s:real;
begin
readln(r);
v:=4/3*pi*power(r,3);
s:=3/4*pi*sqr(r);
writeln('V=',v,' S=',s);
end.