4227

Практична робота на тему Масив

Практическая работа

Информатика, кибернетика и программирование

Масив Мета РГР: побудова схеми алгоритму для рішення задачі, обробки одновимірного масиву у відповідності з варіантом написати програму на мові Pascal, згідно з алгоритмом. Записка до РГР повинна містити: титульний лист текс...

Украинкский

2012-11-14

20.25 KB

7 чел.

Масив

Мета РГР:

  1.  побудова схеми алгоритму для рішення задачі, обробки одновимірного масиву у відповідності з варіантом
  2.  написати програму на мові Pascal, згідно з алгоритмом.

Записка до РГР повинна містити:

  1.  титульний лист;
  2.  текст варіанта;
  3.  блок–схему алгоритму рішення задачі;
  4.  лістинг тексту програми;
  5.  результат.

Варіант 3

Дано масив дійсних чисел. Записати на початок цього масиву всі від’ємні числа, а потім ті, що залишились, зберігши порядок їх послідовності. Алгоритм:

Program RGR2;

Uses crt;

Var

I,j,n:integer; t:real;

a:array[1..100] of real;

Begin clrscr;

writeln('vvedite kol-vo elementov');

readln(n);

for i:=1 to n do

begin

writeln(‘vvidite elementi’);

for i:=1 to n do

readln(a[i]);

end;

writeln;

for i:=1 to n do

for j:=1 to n-1 do

if (a[j]>=0)and(a[j+1]<0)then

begin

t:=a[j];

a[j]:=a[j+1];

a[j+1]:=t;

end;

writeln(‘rezultat’);

for i:=1 to n do

write(a[i],' ');

end.

Кінець  

true

Початок  

Ввод mas

Mas[b-1]=0 and mas[b-2=0 and mas[b=0

3<=10


 

А также другие работы, которые могут Вас заинтересовать

56106. Словник-довідник труднощів української мови (вживання архаїзмів та історизмів) 1.31 MB
  Головне - дати дітям поштовх до роздуму, викликати бажання підносити рівень культури власного мовлення, дбайливо поводитись з найбільшим скарбом народу - його мовою, самовдосконалюватися, інтелектуально зростати.
56107. Проблема збагачення, уточнення й активізації словникового запасу молодших школярів 117.5 KB
  Пізнаючи значення слова діти пізнають світ розкриваючи смислові зв’язки слів у контексті встановлюють взаємозв’язок між предметами і явищами навколишньої дійсності внаслідок чого в них розвивається логічне мислення.