Автор работы: e******************@gmail.com, 28 Ноября 2011 в 10:36, контрольная работа
Современные компьютеры имеют много разнообразных запоминающих устройств, которые сильно отличаются между собой по назначению, временным характеристикам, объёму хранимой информации и стоимости хранения одинакового объёма информации. Различают два основных вида памяти – внутреннюю и внешнюю.
В состав внутренней памяти входят оперативная память, кэш-память и специальная память.
Оперативная память (ОЗУ, англ. RAM, Random Access Memory – память с произвольным доступом)
Решаемая задача относится к категории задач формульного счета. В формуле для вычисления величины z целесообразно выполнить вычленение одинаковых подвыражений. Для этого введем дополнительную переменную p. C учетом этого расчетная формула принимает вид:
В программе должен быть предусмотрен ввод исходных данных, к которым относятся переменные x, a, b; вычисления величин y, p и z; вывод результатов вычислений – значений величин y и z.
Таблица идентификаторов:
| № | Обозначение в задаче | Идентификатор | Назначение |
| 1 | x | x | Исходные данные |
| 2 | a | a | |
| 3 | b | b | |
| 4 | y | y | Результаты вычислений |
| 5 | z | z | |
| 6 | - | p | Промежуточная величина |
Приведем блок-схему алгоритма решения задачи:
Контрольный расчет
Для тестирования программы выберем контрольный набор исходных данных: x=0, a=32 и b=0
Расчет, выполненный вручную, дал следующие результаты: y=1, z=1.5
| Назначение набора данных | Набор данных | Результаты вычислений | |||||
| x | a | b | Ручные | На ЭВМ | |||
| y | z | y | z | ||||
| Контрольный набор | 0 | 32 | 0 | 1 | 1.5 | 1.0000 | 1.5000 |
| Рабочий набор | -8 | 87 | 1.8 | - | - | 0.6737 | 1.0100 |
Программа на языке Pascal:
Program Lab1;
{
Практическое задание 10
ЛИНЕЙНЫЕ ВЫЧИСЛИТЕЛЬНЫЕ ПРОЦЕССЫ
}
Uses Crt;
Var x, a, b, p, y, z: real; {объявление переменных}
begin
clrscr; {для очистки экрана}
write (‘x=’); {ввод исходных данных}
readln(x);
write(‘a=’);
readln(a);
write(‘b=’);
readln(b);
y:=(cos(x)*cos(x)+2)/3;
p:=y*exp(0.2*ln(a));
z:=(p+1)/(sin(b)+p);
writeln(‘y=’, y:8:4,’z=’, z:8:4); {вывод результатов}
readln;
end.
Литература: