Ответ:
прикладное по дизайнер математика системное по программист система программирования методист программирование и дизайнер системное по
Объяснение:
1)16 бит=2 байта т.к 1 байт=8 бит
2)1024 КБ<2 МБ т.к 1 МБ=1024 КБ
3)2 ГБ=2048 МБ т.к 1 ГБ=1024 МБ
4)1 ТБ<2000 ГБ т.к 1 ТБ=1024 ГБ
//Pascal ABC.NET v3.1 сборка 1219
Var
n,k1,k2,i:integer;
r:real;
begin
readln(n);
for i:=1 to n do
begin
readln(r);
if r>0 then k1:=k1+1;
if r<0 then k2:=k2+1;
end;
writeln('Положительные:',k1);
writeln('Отрицательные:',k2);
end.
Пример ввода:
4
-1.1
2
3
0
Пример вывода:
Положительные:2
Отрицательные:1
def for10(n):
return sum([1/x for x in range(1, n+1])
def for11(n):
return sum([(n+x)**2 for x in range(0, n+1)])