600 000 Кбит = 600 000*1024 бит = 600*1024 000 бит.
При скорости 1024 000 бит/с сообщение будет передано за 600 с = 10 мин
Var n:longint;
function kol(n:integer):integer;
begin
if n<10
then kol:=1
else kol:=kol(n div 10)+1;
end;
begin
write('n = ');
readln(n);
writeln('k = ',kol(n));
end.
Пример:
<span>n = 15324
k = 5</span>
Получим формулу для вывода. То, что находится в переменных a и b буду обозначать [a, b]:
[a, b] Ввести a, b
[a+b, b] a:=a+b
[a+b, a] b:=a-b
[b, a] a:=a-b
[b, a] <span>Вывести<span> a+b
Итак, алгоритм просто меняет местами a и b, и выводит сумму b + a.
В порядке возрастания выводов:
</span></span><span><span>3) 7 + 7 = 14
4) 9 + 6 = 15
2) 12 + 4 = 16
1) 8 + 10 = 18
5) 11 + 9 = 20</span></span>
14 детей в классе
7 математика
5 оба
2 только история
12 девочек и мальчиков
9 мальчиков
3 девочки
Блок-схема<span> представляет собой </span><span>совокупность символов, соответствующих этапам работы </span>алгоритма<span> и </span><span>соединяющих их линий</span>