Основы алгоритмизации и программирования (кр№1, вар1)

Язык: русский
Формат: реферат
Тип документа: Word Doc
0 255
Скачать документ

ТОМСКИЙ ГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТ

СИСТЕМ УПРАВЛЕНИЯ И РАДИОЭЛЕКТРОНИКИ (ТУСУР)

Заочный факультет

(дистанционная форма обучения)

Кафедра автоматизированных систем управления (АСУ)

ПРОГРАММИРОВАНИЕ

Контрольная работа №1

Дата выполнения работы: 04.08.2003

Дата проверки:_________

Оценка:_________

Преподаватель:__________________

Подпись преподавателя:___________

2003 г.

Контрольная работа № 1

№ варианта – 1.

Задание:

Задан массив чисел X[1..15].

Определить значение переменной у. Исходные данные и результат напечатать
с пояснительным текстом.

у=

0,000135(А4, если А1(0.

Где А1 – сумма элементов массива Х;

А4 – сумма косинусов положительных элементов массива Х;

М1 – количество элементов массива Х, значения которых меньше А1.

Для решения задачи составим структурную схему алгоритма.

Для этого определиим используемые переменные и их тип.

Х[1..15] – массив, состоящий из 15 элементов, каждый из которых записан
в

экспоненциальной форме и имеет вещественный тип данных;

i – номер очередного элемента;

n – номер конечного элемента массива;

М1 – количество элементов массива, значения которых меньше суммы всех
элементов массива.

Переменные i, n, M1 имеют целочисленный тип данных;

А1 – используется для подсчета суммы всех элементов массива Х;

А4- используется для подсчета сумм косинусов положительных элементов
массива Х;

у – искомая по условию задачи переменная.

Переменные А1, А4, у имеют вещественный тип данных.

Алгоритм выполнения:

Для генерации элементов массива используем процедуру

Randomize;

n:=15;

i:=1;

Генерируем элементы массива Х с помощью функции random и выводим их на
экран

while i<=n dobeginwriteln (i,'-й член массива',random:10);x[i]:=random;i:=i+1;end;Цикл будет повторятся n раз (в данном случае 15), генерируя новый элемент массива Х и заполняя таким образом массив данных.Задаем начальные вычисляемые значения и выводим их на экран.A1:=0;A4:=0;y:=0;M1:=0;Для вычисления суммы всех элементов массива Х и занесения этой суммы в переменную А1 используем циклi:=1;while i<=n dobeginA1:=A1+X[i];i:=i+1;end;Определение на положительность каждого элемента массива.Если элемент положителен, определяем его косинус и суммируем его значение в переменную А4i:=1;while i<=n dobeginif X[i]>0

then A4:=A4+cos(X[i]);

i:=i+1;

end;

Определяем, меньше ли значения каждого элемента массива Х[i] по
сравнению

с суммой всех элементов массива A1. Те элементы, значения которых меньше
A1, суммируются количественно в переменную М1

i:=1;

while i<=n dobeginif X[i]0

then A4:=A4+cos(X[i]);

i:=i+1;

end;

{определяем, меньше ли значения каждого элемента массива по сравнению

с суммой всех элементов массива. Те элементы, значения которых меньше
суммы

всех элементов массива,суммируются количественно в переменную М1}

i:=1;

while i<=n dobeginif X[i]

Похожие документы
Обсуждение
    Заказать реферат
    UkrReferat.com. Всі права захищені. 2000-2018