Электронные презентации-это презентации которые выводятся с проектора на электронную доску,стену и тп.В современное время люди пользуются электронными презентациями чаще.Их создавать очень просто для тех кто немножко разбирается в компьютерах.Электронные презентации создаются примерно так: сначала находим нужную информацию,создаем слайды,оформляем и скачиваем на флешку либо на какой нибудь другой носитель информации.Электроннми презентациями могут быть видео,клипы,слайды и т.д.И их темы тоже разные.Например можно создать презентацию о своем городе либо о любимом певце. Электронные презентации "моднее" чем презентации на листочках или записанных руками.
Поделитесь своими знаниями, ответьте на вопрос:
6.Котором результата соответствует команда изображена на рисунке? А) Придано значение 100 единиц справа от центра сцены Б) Придано значение 100 единиц вверх от центра сцены В) Движение спрайта начинается слева направо Г) Соответствует свойству принимать только слева направо
function MaxElem(a: array[,] of integer; i: integer): integer;
var
j, m: integer;
begin
m := a[i, 0];
for j := 1 to length(a, 1) - 1 do
if a[i, j] > m then
m := a[i, j];
MaxElem := m
end;
procedure Input(var a: array[,] of integer);
var
i, j: integer;
begin
Writeln('вводите элементы массива');
for i := 0 to length(a, 0) - 1 do
for j := 0 to length(a, 1) - 1 do
read(a[i, j]);
end;
procedure Output(var a: array of integer);
var
i: integer;
begin
Writeln('полученный массив');
for i := 0 to length(a) - 1 do
write(a[i], ' ');
end;
var
m, n, i: integer;
a: array[,] of integer;
b: array of integer;
begin
read(m, n); // ввод числа строк и столбцов
setlength(a, m, n);
setlength(b, m);
Input(a);
for i := 0 to m - 1 do
b[i] := MaxElem(a, i);
Output(b);
end.
Написано на Free Pascal