1. "Школьное" решение // PascalABC.Net 3.0, сборка 1064 var i,n1,n2:integer; s:longint; begin Write('Введите интервал для вычисления суммы: '); Read(n1,n2); s:=0; if n1 mod 2 = 0 then i:=n1 else i:=n1+1; while i<=n2 do begin s:=s+i; i:=i+2 end; Writeln('Сумма четных чисел в интервале равна ',s) end.
Тестовое решение: Введите интервал для вычисления суммы: 7 14 Сумма четных чисел в интервале равна 44
2. Современное решение // PascalABC.Net 3.0, сборка 1064 var n1,n2:integer; begin Write('Введите интервал для вычисления суммы: '); Read(n1,n2); if Odd(n1) then Inc(n1); Writeln('Сумма четных чисел в интервале равна ',Range(n1,n2,2).Sum); end.
вообще говоря компьютер не может владеть профессиями.
профе́ссия (лат. professio; от profiteor «объявляю своим делом»[1]) — род трудовой деятельности человека, владеющего комплексом теоретических знаний и навыков, приобретённых в ходе специальной подготовки.
потому, что компьютер - это не человек и не имеет собственного мнения или выбора.
компьютер может выполнять рутинную часть работы многих профессий, вплоть до того, что вместо целого цеха можно оставить лишь одного человека-наблюдателя/компьютерного оператора.
так же из-за возможностей компьютера осложнились многие профессии, например бухгалтерия. если б не было компьютеров, не было возможности сохранять и проверять такую кучу данных, то и не надо было подавать столь много разнообразной отчетности, так что черт ногу сломит. так что бухгалтера могут честно ненавидеть это железо, без которого они как без рук.
а теперь собственно о профессии. раньше одной из должностей библиотекаря было переписывание книг, ведь со временем они приходили в негодность, стирались и тд. на сегодняшний день старые, но нужные книги сканируются и оцифровываются. хотя все равно нужна человека при распознавании трудночитаемых мест, поврежденных страниц и тп.
еще компьютер обеспечивает более удобный способ ведения учетности книг, но без человека ему все равно не обойтись, так как не может взаимодействовать с книгами напрямую.
// PascalABC.Net 3.0, сборка 1064
var
i,n1,n2:integer;
s:longint;
begin
Write('Введите интервал для вычисления суммы: '); Read(n1,n2);
s:=0;
if n1 mod 2 = 0 then i:=n1 else i:=n1+1;
while i<=n2 do begin s:=s+i; i:=i+2 end;
Writeln('Сумма четных чисел в интервале равна ',s)
end.
Тестовое решение:
Введите интервал для вычисления суммы: 7 14
Сумма четных чисел в интервале равна 44
2. Современное решение
// PascalABC.Net 3.0, сборка 1064
var
n1,n2:integer;
begin
Write('Введите интервал для вычисления суммы: '); Read(n1,n2);
if Odd(n1) then Inc(n1);
Writeln('Сумма четных чисел в интервале равна ',Range(n1,n2,2).Sum);
end.
1) библиотекарь;
2)вычислитель;
3)пишущая машинка;
4)делопроизводитель;
5)личный секретарь;
6)бухгалтер;
7)справочное бюро;
8)издатель;
9)переводчик;
10)почтальон;
11)художник;
12)мультипликатор;
13)конструктор;
14)модельер;
15)архитектор;
16)дизайнер;
17)композитор и музыкант;
18)врач;
19)учитель;
20)игротека.
вообще говоря компьютер не может владеть профессиями.
профе́ссия (лат. professio; от profiteor «объявляю своим делом»[1]) — род трудовой деятельности человека, владеющего комплексом теоретических знаний и навыков, приобретённых в ходе специальной подготовки.
потому, что компьютер - это не человек и не имеет собственного мнения или выбора.
компьютер может выполнять рутинную часть работы многих профессий, вплоть до того, что вместо целого цеха можно оставить лишь одного человека-наблюдателя/компьютерного оператора.
так же из-за возможностей компьютера осложнились многие профессии, например бухгалтерия. если б не было компьютеров, не было возможности сохранять и проверять такую кучу данных, то и не надо было подавать столь много разнообразной отчетности, так что черт ногу сломит. так что бухгалтера могут честно ненавидеть это железо, без которого они как без рук.
а теперь собственно о профессии. раньше одной из должностей библиотекаря было переписывание книг, ведь со временем они приходили в негодность, стирались и тд. на сегодняшний день старые, но нужные книги сканируются и оцифровываются. хотя все равно нужна человека при распознавании трудночитаемых мест, поврежденных страниц и тп.
еще компьютер обеспечивает более удобный способ ведения учетности книг, но без человека ему все равно не обойтись, так как не может взаимодействовать с книгами напрямую.