В 1 байте 8 бит, значит 40*8 бит=320 бит
<u>PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var a:=ArrRandom(10,-10,50); a.Println;
a.Transform(t->t<0?-t:t); a.Println
end.
<u>Пример</u>
4 -6 26 -5 14 17 17 47 -9 26
4 6 26 5 14 17 17 47 9 26
<meta charset = "UTF 8">
<script>
var a = prompt("Введите первое число");
var b = prompt("Введите второе число");
var c = a + b;
var k = a * b;
alert("Произведение" + k);
alert("Сумма"+ c);
</script>
Кстати это HTML программа для браузера.
Дано:
V = 56000 бит/сек
t = 15 cек
Найти:
I - ?
Решение:
I = t * V
I = 15 * 56000 = 840000 бит - передать можно за 15 сек при такой скорости
840000 бит = 840000/8 = 105000 байт /1024 = 102,54 Кбайт информации
Ответ: 102,54 Кбайт информации можно передать за 15 сек при такой скорости.
Var
i, sum: integer;
begin
sum := 0;
for i := 23 to 49 do if (i mod 7 = 0) and (i mod 2 = 0) then sum := sum + i;
writeln(sum);
end.