<span>
1) {найти квадрат числа}</span>
<span /><span><span>var k:</span>real;</span><span />
<span>begin
</span><span>read(k);
</span>
<span>k:=k*k;
write(k);</span><span><span /><span>end.</span></span>
<span><span /></span>2) {задача с оценками}
<span><span><span><span>v</span></span></span></span><span><span><span><span>ar i:</span>integer; </span></span></span>
<span><span><span>a,b,c,d,e: 2..5;</span></span></span>
<span><span><span>sred:real;</span></span></span>
<span><span><span /><span>
begin
</span><span>write ('Введите оценки, после каждой Enter');</span><span /></span></span>
<span><span><span>read(a);
read(b);
read(c);
read(d);
read(e);
</span></span></span>
<span><span><span /><span>sred:=(a+b+c+d+e)/5;</span></span></span>
<span><span><span /><span /><span><span>if sred >= </span>4.5 then writeln('Тебе подарят плеер и роликовые коньки!')</span><span /></span></span>
<span><span><span /><span><span>else if (sred >=</span>3.5<span>) and (sred <</span>4.5<span>) then</span></span><span>writeln('Увы, тебе подарят только плеер');</span><span><span /></span></span></span>
<span><span><span><span /><span>end.</span></span></span></span>
I=1, X=10, C=100, M=1000 и их половины V=5, L=50, D=500
<span>MCXLVII=1147</span>
(I - информационный объем текста, K - кол-во символов, i - вес одного символа/бит на символ)
Дано:
K = 31 шт
i = 8 бит
I - ?
Решение:
I = K * i = 31 * 8 бит = 248.0 бит
Https://pastebin.com/j15VvSZa - Вот так запиши будет норм
Эргоно́мика (от др.-греч. ἔργον — работа + νόμος — закон) — в традиционном понимании — наука о приспособлении должностных обязанностей, рабочих мест, предметов и объектов труда, а также компьютерных программ для наиболее безопасного и эффективного труда работника, исходя из физических и психических особенностей человеческого организма.