ответьте на во Предложите правила использования объектов интеллектуальной
собственности без нарушения авторских прав.
2) Как связаны понятия авторское право и плагиат? т.
3) Каковы проблемы защиты авторских прав в сети FIнтернет в
настоящее время?
167
294
Ответы на вопрос:
Var m,n,p: real; k: integer; begin write('введите через пробел начало и конец интервала: '); read(m,n); p: =1; k: =trunc(m); if (k mod 2)=0 then inc(k); { первое нечетное } n: =int(n); { целочисленный конец интервала } while k< =n do begin p: =p*k; k: =k+2 end; writeln('произведение нечетных на интервале: ',p) end. тестовое решение: введите через пробел начало и конец интервала: -3.8 8.2 произведение нечетных на интервале: 315 var m,n,i,j: integer; p: real; begin write('введите через пробел целочисленные границы интервала: '); read(m,n); for i: =m to n do begin p: =1; if i=0 then writeln('2^0=1') else if i< 0 then begin for j: =-1 downto i do p: =p/2; writeln('2^(',i,')=',p) end else begin for j: =1 to i do p: =p*2; writeln('2^',i,'=',p) end end end. тестовое решение: введите через пробел целочисленные границы интервала: -5 10 2^(-5)=0.03125 2^(-4)=0.0625 2^(-3)=0.125 2^(-2)=0.25 2^(-1)=0.5 2^0=1 2^1=2 2^2=4 2^3=8 2^4=16 2^5=32 2^6=64 2^7=128 2^8=256 2^9=512 2^10=1024
Популярно: Информатика
-
соня23040311.04.2023 17:30
-
Оленька09011.03.2021 21:49
-
Alinыch1109.12.2020 15:35
-
serebrykov94714.05.2020 00:44
-
OleskaSwag17.07.2020 08:02
-
polanovikova06.02.2023 07:13
-
кавказец7818.04.2021 14:31
-
ПАРРА31.03.2021 21:18
-
Gangstar777437g19.02.2020 07:43
-
elinaaldamowa17.08.2022 12:13