Program First;
var
a, b, c, d, m, n: integer;
begin
a:= 5;
b:= 9;
c:=7;
d:=13;
m:= a*d;
n:=b*c;
writeln(m, n);
end.
1)
program s_parallelogramm;
var
a,h,s: real;
begin
write('Основание = '); readln(a);
write('Высота = '); read(h);
if ((a=0) or (a<0)) or ((h=0) or (h<0)) then writeln('Ошибка! Значения основания и высоты должно быть натуральными числами')
else
begin
s:=a*h;
writeln('Площадь (S) параллелограмма = ', s);
end;
end.
Воспользуемся формулой I = k * i, где I - информационный объем сообщения; k - количество символов в сообщении; i - информационный вес одного символа.
I = k * i
I = 100 * 6
I = 600 бит - объем
<em>Отсюда вытекает вопрос: откуда появилась 6?
</em>представим 64 формулой n=2 в степени i ( i - количество бит) <em>Т.к. нам необходимо найти i для нахождения объема текста, 64 = 2 в 6 степени. </em>
Исполнители алгоритмовЗадание 5Исполнитель Робот ходит по клеткам бесконечной вертикальной клетчатой доски, переходя по одной из команд вверх, вниз, вправо, влево в соседнюю клетку в указанном направлении. Робот выполнил следующую программу:вправовверхвлевовлевовнизвнизвправовправовправо внизвлевоУкажите наименьшее возможное число команд в программе, переводящей Робота из той же <span>начальной клетки в ту же конечную</span>
345:2=172(1)
172:2=86(1)
86:2=43(0)
43:2=21(1)
21:2=10(1)
10:2=5(0)
5:2=2(1)
2:2=1(0)
Ответ: 101011001