var i,n,p,s,k,m:integer;
a:array [1..11] of integer;
begin
n:=10;
p:=1;
write('Массив: ');
for i:=1 to n do
begin
a[i]:=random(9)+1;
if a[i] mod 3 = 0 then p:=p*a[i];
write(a[i]:2,' ')
end;
writeln;
if p<>1 then writeln('Произведение элементов кратных 3 равно ',p)
else writeln('Элементов кратных 3 нет. Произведение элементов кратных 3 равно 0');
n:=9;
write('Массив: ');
for i:=1 to n do
begin
a[i]:=random(9)+1;
if a[i] > 5 then
begin
s:=s+a[i];
k:=k+1
end;
write(a[i]:2,' ')
end;
writeln;
if k<>0 then writeln('Cреднее арифметическое элементов массива больше 5 равно ',s/k:0:3)
else writeln('Элементов больше 5 нет. Cреднее арифметическое элементов массива больше 5 равно 0');
n:=11;
write('Массив: ');
for i:=1 to n do
begin
a[i]:=random(9)+1;
write(a[i]:2,' ')
end;
writeln;
m:=a[1];
for i:=2 to n do
if a[i]>m then m:=a[i];
writeln('Самый большой элемент массива равен ',m)
end.
Практическая работа
Тема: Построение графиков функций в Excel 2010
Задание 1. Построить график функции y=x2 на отрезке [-5; 5] с шагом 0,5hello_html_m7434b05.png
Составить таблицу значений (Рисунок 1)
Выделите диапазон ячеек значений y и выполните команду Вставка – График.
Откройте Вкладку Работа с диаграммами Макет Название диаграммы График функции y=x2
Щелкните по области построения диаграммы, Выбрать данные – Подписи горизонтальной оси (категории) –Изменить- выделить диапазон А3:А23 (Рисунок 2)hello_html_m46c52806.png
Выберите Ряд Изменить - Имя ряда y=x^2 - Ок
Не снимая выделения с диаграммы выберите вкладку Макет – Названия осей –название горизонтальной оси – название под осью-x. Аналогично внесите название оси y.
hello_html_mfc27ecf.png
Рисунок 3 - Название графика
Выделите двойным щелчком мыши линию графика, правой кнопкой мыши -Формат ряда данных- тип линии- сглаженная линия.
hello_html_m1a8e5315.png
Формат ряда данных
Перенесите ось y в точку 0. Для этого выполните команду Макет- Оси-Горизонтальная ось - Дополнительные параметры горизонтальной оси -
hello_html_m74b02b75.png
– Дополнительные параметры основной горизонтальной оси
Вертикальная ось пересекает в категории номер 11, Положение оси по делениям
Самостоятельно измените цвет линии графика и формат области диаграммы выбрав Градиентную заливку.
Самостоятельно аналогично выполните задания:
Задание 2. Построить график функции y=x3 на отрезке [-3; 3] с шагом 0,5
Задание 3. Построить график функции y=cosx на отрезке [-3; 3] с шагом 0,5
Задание 4. Построить график функции y=2sin3x на отрезке [-3; 3] с шагом 0,5
Задание 5. Решите графически с уравнение 2x2=2x+4
Объяснение: