Var
a:longint;
begin
readln(a);
writeln(a×a×a);
end;
<span>Разработать программу для подсчета количества отрицательных чисел среди целых чисел a, b, c. Программа должна иметь дружественный интерфейс. Протестировать программу для всех возможных случаев (когда количество отрицательных чисел равно 0, 1, 2 и 3).</span>
<span> ОТВЕТ:</span>
<span>var</span> a<span>,</span>b<span>,</span>c<span>,</span>k<span>:</span><span>integer</span>;
Program n1;
var a,b: integer;
begin
readln(a,b);
writeln('срзнач: ',(a+b)/2);
write('сргеом: ',sqrt(a*b));
end.
Ответ:
Машинный двоичный язык – логическая последовательность “0” и “1”.
Каждая цифра двоичного кода несет количество информации, равное 1 бит.
На рисунке – схема дорог, связывающих города А, Б, В, Г, Д, Е, Ж, З, И, К, Л. По каждой дороге можно двигаться только в одном на
Zhenya2017
А = 1
В = А = 1
Б = А + В = 2
Г = А + В = 2
Д = А + Г = 3
Е = Б = 2
Ж = Г + Д = 5
З = Б + В + Г + Е + Ж = 12
И = З = 12
К = З = 12
Л = З + И + К = 12 + 12 + 12 = 36
Ответ: 36