program Project2;
{$APPTYPE CONSOLE}
uses SysUtils;
var i,x,y,z, dwa,tri,shetire,pati:Integer;
begin
Writeln('student Fediya=');
Readln(i);
Writeln('student Sungat=');
readln(x);
Writeln('student Alex=');
readln(y);
Writeln('student Halif=');
Readln(z);
case i of
2: Inc(dwa);
3: Inc(tri);
4: Inc(shetire);
5: Inc(pati);
end;
begin
case x of
2: Inc(dwa);
3: Inc(tri);
4: Inc(shetire);
5: Inc(pati);
end;
end;
begin
case y of
2: Inc(dwa);
3: Inc(tri);
4: Inc(shetire);
5: Inc(pati);
end; end;
begin
case z of
2: Inc(dwa);
3: Inc(tri);
4: Inc(shetire);
5: Inc(pati);
end;
end;
WriteLn(#13#10'dwa: ', dwa, #13#10'tri: ', tri, #13#10'shetire: ', shetire, #13#10'pati: ', pati);
ReadLn;
{ TODO -oUser -cConsole Main : Insert code here }end.<span>
</span>
Время получения Васей 1024 Кбайт =
{2^(10) *2^(10) *2^3 } бит : {2^(17)} бит/с =2^6 c = 64 секунды
Петя 8 Мбайт получит за
{2^3 * 2^(23)} бит : {2^16} бит/с = 2^(10) = 1024 c
1024+64 =1088 c
Ответ : 1088 с
1) какой то вопрос неполный, ну может комнатами))
вот я составляла на чертежник
А)Павел. Так как высказывание истинно первая согласная или последняя