<em>Архитектор</em> - проектирование новых зданий и сооружений,создание чертежей.
<em>Библиотекарь</em> - Формирование каталогов;хранение книг,газет и журналов в электронной форме;быстрый поиск и доступ к нужному материалу.
<em>Бухгалтер</em> - Быстрый расчет заработной платы,учет доходов и налогов,подготовка документации.
<em>Врач</em> - Обследование,диагностика,назначение лечения.
<em>Дизайнер</em> - Создание интерьеров,подбор фактуры и цвета отделочных материалов,расположение предметов.
<em>Композитор</em> - Создание,обработка,исполнение музыкальных композиций.
<em>Конструктор</em> - Проектирование и расчет характеристик новых механизмов и конструкций.
<em>Модельер</em> - Разработка новых моделей одежды и обуви,подготовка выкроек.
<em>Мультипликатор</em> - Создание новых изображений,изменение имеющихся рисунков и фотографий.
<em>Учитель</em> - Демонстрация изучаемого материала в наглядной форме,проведение экспериментов,проверка знаний.
А2=12
В2=4
С2=4
Соответственно D2 тоже должно быть равно 4 (по диаграмме)
То есть B2=8 (4*2=8)
ти на английском написал паска убири л и все будет правильно
Var a,max,sum:integer;
arr:array [0..2015] of integer;
begin
randomize;
max:=-500;
sum:=0;
for a:=0 to 2015 do begin
arr[a]:=random(1001)-500;
if max<arr[a] then max:=arr[a];
end;
write('максимальный элемент массива ==> ',max);
writeln();
if max mod 2 = 1 then begin
for a:=0 to 2015 do begin
if arr[a] mod 2 =1 then sum:=sum+arr[a];
end;
writeln('сумма чисел одинаковой чётности числу ',max,' = ',sum);
end;
sum:=0;
if max mod 2 = 0 then begin
for a:=0 to 2015 do begin
if arr[a] mod 2 =0 then sum:=sum+arr[a];
end;
writeln('сумма чисел одинаковой чётности числу ',max,' = ',sum);
end;
end.
Речовини складаються з молекул та атома....………………
