Создан заказ №4112592
10 июня 2019
Построить блок-схему алгоритма и написать программу на языке Pascal для вычисления значений функции
Как заказчик описал требования к работе:
Задание: решить контрольную по информатике, срок 2 дня, очень нужно! Расписывайте, пожалуйста, подробное решение для каждой задачи.
Фрагмент выполненной работы:
Построить блок-схему алгоритма и написать программу на языке Pascal для вычисления значений функции:
y(x) = 5 – sin(x)
на интервале (0;30) с шагом Δx = 3. Алгоритмы циклов построить тремя способами:
с предусловием
с постусловием
с параметром
Решение:
С предусловием
uses crt;
var
a, b, h, x, y: real;
n: integer;
begin
a := 0;
h := 3;
b := 30;
writeln('Табулирование функции y=5-sin(x)');
writeln('на интервале (', a:0:1, ';', b:0:1, ') с шагом ', h:0:1);
writeln('--------------------');
writeln('| № | X | Y |');
writeln('--------------------');
x := a+h;
n := 1;
while x < b do
begin
y := 5 - sin(x);
writeln('|', n:3, ' |', x:4:1, ' |', y:6:2, ' |');
n := n + 1;
x := x + h;
end;
writeln('--------------------');
readln;
end.
С постусловием
uses crt;
var
a, b, h, x, y: real;
n: integer;
begin
a := 0;
h := 3;
b := 30;
writeln('Табулирование функции y=5-sin(x)');
writeln('на интервале (', a:0:1, ';', b:0:1, ') с шагом ', h:0:1);
writeln('--------------------');
writeln('| № | X | Y |');
writeln('--------------------');
x := a+h;
n := 1;
repeat
begin
y := 5 - sin(x);
writeln('|', n:3, ' |', x:4:1, ' |', y:6:2, ' |');
n := n + 1;
x := x + h;
end;
until (x>b-h);
writeln('--------------------');
readln;
end.
С параметром...Посмотреть предложения по расчету стоимости
Заказчик
заплатил
заплатил
200 ₽
Заказчик не использовал рассрочку
Гарантия сервиса
Автор24
Автор24
20 дней
Заказчик принял работу без использования гарантии
11 июня 2019
Заказ завершен, заказчик получил финальный файл с работой
5
Построить блок-схему алгоритма и написать программу на языке Pascal для вычисления значений функции.docx
2019-06-14 22:33
Последний отзыв студента о бирже Автор24
Общая оценка
5
Положительно
Оперативно, раньше срока. рекомендую заказчикам. Впредь буду работать только с вами.
Хочешь такую же работу?
300 ₽
