Задача 1. Расчет по формуле.

Написать программу расчета по заданным формулам:

и .

Из формул видно, что исходными данными для этой программы являются три величины – x, y, z. Так как их тип и точность представления в условии не оговорены, выберем для них вещественный тип (real). Все, что требуется для решения этой задачи, - правильно записать формулы на языке программирования Паскаль.

Листинг 1. Текст программы решения задачи 1.

Program FORMULA;

var

x, y, z, a, b: real; {Описания переменных}

temp1, temp2: real;

begin

WriteLn (‘Введите x: ’); {Вод исходных данных x, y, z)

ReadLn (x);

WriteLn (‘Введите y: ’);

ReadLn (y);

WriteLn (‘Введите z: ’);

ReadLn (z);

temp1: = sqrt(abs(x-1))-sqrt(abs(Pi*x)); {Расчеты по формулам}

temp2: = 1+sqr(x)/2+sqr(y)/4;

a: = temp1/temp2 +2.6e3;

b: = x*(sin(z)+cos(-(x+3)));

WriteLn (‘ Результат: a = ’, a: 6: 2); {Вывод результатов вычисления}

WriteLn (‘ Результат: b = ’, b: 6: 2);

ReadLn;

end.

Обратите внимание :

1. Аргумент функции всегда заключается в круглые скобки. Если аргументом служит результат вычисления другой функции, они вкладываются друг в друга, как матрешки. Функция Pi не имеет аргументов, поэтому для ее вызова достаточно указать ее имя.

2. Запись 2.6е3 представляет собой вещественную константу с порядком (запись 1, 2*10⁴ в языке программирования Паскаль записывается без пробелов 1.2е4; 0, 1*10^-5 записывается 0.1е-5). Константы с порядком обычно используются для представления очень больших и очень малых величин. В нашем случае можно было использовать обычную целую константу 2600.

3. В отличие от математической записи в выражении нельзя опускать знак умножения.

4. Все операции выполняются в соответствии с приоритетами, а если операции имеют одинаковый приоритет, они выполняются слева направо. Изменить порядок вычислений можно с помощью круглых скобок. Количество открывающих скобок в выражении должно быть равно количеству закрывающих.

5. Для выводимого значения(в нашем случае это значение переменной b ) можно задать его формат, например: WriteLn (‘ Результат: b = ’, b: 6: 2); Рассмотрим этот оператор подробно. В списке вывода два элемента, разделенных запятыми. В начале записана строковая константа в апострофах, которая выводится без изменений, со всеми пробелами. Для нее указаны две форматные спецификации, означающие, что под эту переменную отводится всего шесть позиций, причем две из них – под дробную часть (еще одна позиция будет занята десятичной точкой, итого на целую часть остается три позиции)

Советы

1. Приступая к написанию программы, четко определите, сто является ее исходными данными и что требуется получить в результате.

2. Выбирайте тип переменных с учетом диапазона и требуемой точности представления данных.

3. Давайте переменным имена, отражающие их назначение.

4. Ввод с клавиатуры (процедура Read или ReadLn) предваряйте приглашением с помощью процедуры Write или WriteLn, а выводимые значения – пояснениями. Для контроля сразу же после ввода выводите исходные данные на дисплей.

Задача 2.Нахождение процентов.

Вычислить процент материала, идущего в отходы, если из куба ребра а был выточен шар радиусом r. Проценты отхода могут быть найдены по формуле: , где .

Составим схему алгоритма решения задачи:

Листинг 2. Текст программы решения задачи 2.

Program PROT; {Заголовок программы}

var {Раздел описания переменных }

a, r, V_k, V_ot, V_sh, p: real; {Описания переменных}

begin {Ключевое слово начало программы}

Write (‘Введите ребро куба a: ’); {Выводит на экран ‘Введите ребро куба a: ’}

ReadLn (a); {Ввод ребра куба с помощью процедуры ReadLn}

Write (‘Введите радиус шара r: ’); {Выводит на экран ‘Введите радиус шара r: ’}

ReadLn (r); {Ввод радиуса шара}

V_k: = a*a*a; {Вычисление объема куба }

V_sh: = 4/3*Pi*r*r*r; {Вычисление объема шара}

V_ot: = V_k - V_sh; {Вычисление объема отходов}

p: = V_ot / V_k *100; {Нахождение процента материала, идущего в отходы}

WriteLn(‘Отходы составляют ’, p, ’%’); {Выполняется вывод результатов вычисления}

end. {Ключевое слово конец программы}

Итоги: 1В первой строке пишут заголовок программы, хотя это и не обязательно.

2.Далее идет раздел описания переменных. Все переменные должны быть предварительно описаны, чтобы компилятор знал, сколько под них выделить места в памяти и что с ними можно делать.

3.Потом следует раздел операторов (begin ….end).

4.В следующей строке - выводим на экран сообщение, с помощью процедуры Write или WriteLn, поясняющее, какие данные необходимо ввести.

5.Далее осуществляется ввод данных с клавиатуры с помощью процедуры ввода данных ReadLn или Read.

6.Далее находятся непосредственные вычисления.

7.Выполняется вывод результатов вычисления с помощью процедуры WriteLn..

5. До запуска программы подготовьте тестовые примеры, содержащие исходные данные и ожидаемые результаты. Отдельно поверьте реакцию программы на неверные исходные данные.

6. При записи выражений обращайте внимание на приоритет операций.

7. Разделяйте данные при вводе пробелами, символами перевода строки или табуляции.

8. Тщательно форматируйте текст программы и снабжайте его содержательными комментариями.

Индивидуальные задания

Задание 1.

⇐ Предыдущая 123 4 Следующая ⇒