Теми рефератів
> Реферати > Курсові роботи > Звіти з практики > Курсові проекти > Питання та відповіді > Ессе > Доклади > Учбові матеріали > Контрольні роботи > Методички > Лекції > Твори > Підручники > Статті Контакти
Реферати, твори, дипломи, практика » Контрольные работы » Програми знаходження масивів

Реферат Програми знаходження масивів





ння масиву У} ('Введіть розмірність масиву У');

read (n1m, n2m); i: = 1 to n1m doj: = 1 to n2m do [i, j]: = random (100) * 0.2;

end;;

{Формування масиву Про} ('Введіть розмірність масиву О');

read (n1p, n2p); i: = 1 to n1p doj: = 1 to n2p do [i, j]: = random (100) * 0.3;;;

{Друк масивів}

Pechat (n1m, n2m, my);

Pechat (n1p, n2p, mo);;

{Підрахунок середніх значень 1-го і 3-го стовпців}

b: = Sred (n1m, n2m, my, 1);

writeln ('Середнє значення елементів першого стовпця масиву У =', b: 7:3);

b: = Sred (n1m, n2m, my, 3);

writeln ('Середнє значення елементів третього стовпця масиву У =', b: 7:3);

b: = Sred (n1p, n2p, mo, 1);

writeln ('Середнє значення елементів першого стовпця масиву O =', b: 7:3);

b: = Sred (n1p, n2p, mo, 3);

writeln ('Середнє значення елементів третього стовпця масиву O =', b: 7:3);.


Результат виконання програми


В 

Контрольне завдання № 10


Задати два одновимірних масиву значень, щоб величини елементів масивів потрапляли в заданий інтервал на всьому діапазоні (значення вибрати довільно). Для вирішення даної задачі застосувати підпрограму типу Procedure.

Т (15), L (8) Визначити середньогеометричні значення

(-1, 3) позитивних елементів двох масивів

Рішення



Блок-схема

В 

Масиви Т (15), L (8) формуються за допомогою вбудованої функції random. Для цього використовується підпрограма-процедура fmas. p align="justify"> Для заміни визначення середньогеометричними значення позитивних елементів у масиві використовується процедура kp

Лістинг програми


Program Zadanie_10; CRT; mm = array [1 .. 20] of real;

var mg, mk: mm;, n2, k: integer;

s1, s2, x1, x2, p, sg: real;

{Процедура формування масиву} fmas (n: integer; x1: real; x2: real; var b: mm); k: integer; k: = 1 to n do [k]: = x1 + (x2-x1) * random; k: = 1 to n do (b [k]: 6:3, '');

writeln;;

{Процедура підрахунку середньогеометричними значення

позитивних елементів}

procedure kp (b: mm; n: integer; var k: integer; var p: real);

var i,...


Назад | сторінка 3 з 5 | Наступна сторінка





Схожі реферати:

  • Реферат на тему: Обробка одновимірних масивів. Виділення мінімального і максимального елеме ...
  • Реферат на тему: Проектування програми з аналізу масиву
  • Реферат на тему: Модернізація жорсткого диска за допомогою RAID-масиву
  • Реферат на тему: Розробка програми обробки масиву даних з побудовою діаграми (предметна обла ...
  • Реферат на тему: Обробка масиву покажчиків