<em>// PascalABC.NET 3.2, сборка 1353 от 27.11.2016</em>
<em>// Внимание! Если программа не работает, обновите её версию!</em>
begin
Writeln(ReadReal('a=')*4,' - периметр')
end.
<u>Пример</u>
a= 12.7
50.8 - периметр
1) Записать число в двоичной системе счисления, и степени двойки справа налево: 16,8,4,2,1
2) Пройдитесь по каждой цифре двоичного числа. Если эта цифра 1, запишите
соответствующую степень двойки под цифрой. Если эта цифра 0, запишите
под цифрой 0.
т.е. 16 в первой степени, 8 в нулевой, 4 в первой, 2 в нулевой, 1 в первой
3) сложить полученные результаты
<span>
10101 ² = 16^1+8^0+4^1+2^0+1^1= 16+0+4+0+1=21
^ - это возведение в степень
</span>
program zadacha;
var a,b:integer;
begin
writeln('введите число сотен');
readln(a);
b:=a*100;
writeln('введите число десятков');
readln(a);
b:=b+a*10;
writeln('введите число едениц');
readln(a);
b:=b+a;
writeln('полученное число = ',b);
readln;
end.
1)9*1024= 9 216 байт
2)4*1024*1024= 4 194 304 байт
3)41*1024*8= 335 872 бит
4)бод - опечатка
5)t=204 сек
V=204 Кб
u=v/t = 1 кб/сек
6)V=13 876 432 бит
u=8941 бит/сек
t=V/u=1552 сек =25 мин 52 сек
FCEditor 1.6
Эта программа умеет по коду рисовать блоксхемы. Правда на ошибки она привередливая.