Искомое значение определяется как число сочетаний из 7 по 3:
C(n,m) = n!/(m!*(n-m)! = 7!/(3!*(7-3)!) = 7!/(3!*4!) = 35
Var
n,i:Integer;
begin
for i:=-5 to 5 do
WriteLn(3*i+2);
end.
Var time:integer;
var summa:real;
var month:string;
k:=1.05;
begin
month := ' месяцев';
summa:=10000;
while summa<20000 do begin
summa:=summa*k;
time:=time+1;
end;writeln('Ответ:',time + month);
end.
В условии задачи есть ошибка (или неверная запись). Должно быть так:
<span>Используя m двоичных разрядов можно закодировать N=2^m (2 в степени m) независимых значений/
Для кодирования 64 различных значений необходимо 6 двоичных разрядов (2^6=64)</span>
program n_1;
var S:integer;
begin
S:=(sqr(2)+sqr(4)+sqr(6)+sqr(8)+sqr(10));
writeln(S);
end.
sqr(i) - sqr это возведение числа во вторую степень, а i само число