Реферат: Создание презентации, формирование массива

Федеральное агентство по образованию

Ливенскийфилиал ГОУ ВПО

Орловскийгосударственный технический университет

Факультет экономики и права

Кафедра общетехнических дисциплин


Курсовая работа по курсу: Информатика

Создание презентации, формирование массива


Задание №1

Создать презентациюк реферату на тему «Excel – фильтрация данных».

/>

/>


/>

/>

/>


/>

/>

/>


/>

/>

Задание№2

Условие

1. Дан массивD(N). Сформировать массив В изэлементов массива D кратных 4 или 3.


/>

Программа

Programzadacha;

varN,K,I:integer;

B,D:array[1..10]of integer;

begin

writeln('введите количество элементов');

readln(N);

forI:=1 to N do begin

writeln ('вв-те эл-т массива');

readln(D[N]);

end;

K:=0;

forI:=1 to N do begin

ifD[I]mod 3=0 then begin

ifD[I]mod 4=0 then begin

K:=K+1;

B[K]:=D[I];

end;end;

forI:=1 to K do begin

writeln(B[I]);

end;

end;

end.

/>

Условие

 

2. Задан одномерныймассив, состоящий из нулей и едниниц. Проверить существует ли строгое чередование.

/>


Программа

Programzadacha;

varA:array [1..10] of integer;

I,K,K1,N:integer;

begin

writeln('вв-те кол-во строк');

readln(N);

forI:=1 to N do begin

writeln('вв-те эл-т');

readln(A[I]);

end;

K:=0;K1:=0;

forI:=1 to N-1 do

ifA[I]<A[I+1] then K:=K+1;

forI:=1 to N-1 do

ifA[I]>A[I+1] then K1:=K1+1;

ifK=N-1 then writeln('да');

ifK1=N-1 then writeln('нет');

end.

/>

еще рефераты
Еще работы по информатике, программированию