Const n=6;
var x:array[1..n] of integer=(-1, 1, 2, -2, -3, 3);
y,z:array[1..n] of integer;
i,i1,i2:integer;
begin
for i:=1 to n do write(x[i]:3);
writeln;
i1:=0; i2:=0;
for i:=1 to n do
if x[i]>0 then begin i1:=i1+1; y[i1]:=x[i]; end
else if x[i]<0 then begin i2:=i2+1; z[i2]:=x[i]; end;
writeln(' Y: Z:');
for i:=1 to n do
if (i1>=i)and(i2>=i)
then writeln(y[i]:3,z[i]:4)
else if i1>=i then writeln(y[i]:3)
else if i2>=i then writeln(z[i]:7);
end.
Результат:
-1 1 2 -2 -3 3
Y: Z:
1 -1
2 -2
3 -3
1) 1 байт = 8 бит
54000 бит/с = 54000/8 байт/с = 6750 байт/с.
2) В информатике 1 кБайт =
= 1024 ⇒
875 кбайт = 875 * 1024 байт = 896000 байт
3)
≈ 133 (c)
Import math
a = float(input())
b = float(input())
c = math.sqrt(a**2 + b**2)
s = (a * b) / 2
print("Площадь треугольника: %.2f" % s)
print("Гипотенуза треугольника: %.2f" % c)
ГистограммыГрафикиКруговые диаграммыЛинейчатые диаграммыДиаграммы с областямиТочечные диаграммыБиржевые диаграммыПоверхностные диаграммыКольцевые диаграммыПузырьковые диаграммыЛепестковые диаграммы
# # Код на ruby 2.2.3p173
max = 0
max_last = 0
min = 1000
min_last = 1000
n = 0
begin
max_last = max
min_last = min
File.open("input.txt", "r") do |infile|
line = infile.gets.strip
p line
n = line.to_i if n == 0
while (line = infile.gets)
p line
number = line.strip.to_i
max = number if max == 0 or number == max + 1
min = number if min == 1000 or number == min - 1
p [min, max]
end
end
end until (max == max_last and max < n) or (min > 0 and min == min_last) or (min == 0 and max == n)
p max + 1 if max == max_last and max < n
p min - 1 if min > 0 and min == min_last
p "error" if min == 0 and max == n