Поможем написать учебную работу
Если у вас возникли сложности с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой - мы готовы помочь.
Если у вас возникли сложности с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой - мы готовы помочь.
Министерство образования Российской Федерации
Сибирского Государственного Технологического Университета
Факультет: Автоматизации и информационных технологий
Кафедра: Информационных технологий
Расчетная работа №18
По дисциплине «Алгоритмические языки и программирование»
Руководитель:
Якимов С.П.
(подпись)
Разработал:
Студент гр. 21-6
Прокопьев М.C.
(подпись)
Красноярск-2003.
Отчёт.
Вариант №8.
Задача № 164а.
Даны действительные числа a1, ..., a50. Получить "сглаженные" значения a1, ..., a50, заменив в исходной последовательности все члены, кроме первого и последнего, по формуле считается, что
а) после того как получено новое значение некоторого члена, оно используется для вычисления нового значения следующего члена;
Блочная схема программы:
Текст программы:
program Z_164;
uses crt;
var
A:array[1..50]of real;
i:word;
begin
randomize;
clrscr;
writeln('Исходная последовательность:');
for i:=1 to 50 do
begin
A[i]:=(random-0.5)*10;
write(A[i]:8:2);
end;
writeln;
writeln('Измененная последовательность:');
write(A[1]:8:2);
for i:=2 to 49 do
begin
A[i]:=(A[i-1]+A[i]+A[i+1])/3;
write(A[i]:8:2);
end;
write(A[50]:8:2);
readln;
end.
№ |
Идентификатор Переменной |
Переменная предназначена для хранения значений |
1 |
A |
Массива |
2 |
i |
Переменной шага цикла |
3 |
A[i] |
Результатов вычислений |
Контрольный пример:
Результат расчетов
«Исходная последовательность: »
-2,78 |
-1,17 |
3,05 |
0,42 |
-2,39 |
3,16 |
0,86 |
0,99 |
1,39 |
3,18 |
-1,58 |
4,95 |
-3,23 |
1,44 |
3,25 |
1,51 |
-4,88 |
-1,35 |
-3,56 |
1,10 |
1,20 |
-0,34 |
4,29 |
3,07 |
-1,27 |
-4,77 |
-0,89 |
-0,82 |
4,59 |
-2,28 |
-0,91 |
2,04 |
-2,08 |
0,46 |
-0,59 |
0,25 |
2,68 |
-4,16 |
-0,42 |
4,44 |
4,71 |
4,09 |
4,32 |
0,92 |
-3,04 |
4,25 |
-2,25 |
2,23 |
-1,04 |
-4,29 |
«Измененная последовательность: »
-2,78 |
-0,30 |
1,06 |
-0,30 |
0,15 |
1,39 |
1,08 |
1,15 |
1,90 |
1,17 |
1.51 |
1,08 |
-0,24 |
1,48 |
2,08 |
-0,43 |
-2,22 |
-2,38 |
-1,61 |
0,23 |
0,36 |
1,44 |
2,93 |
1,58 |
-1,49 |
-2,39 |
-1,37 |
0,80 |
1,00 |
-0,76 |
0,12 |
0,03 |
-0,53 |
-0,22 |
-0,19 |
0,91 |
-0,19 |
-1,59 |
0,81 |
3,32 |
4,04 |
4,15 |
3,13 |
0,34 |
0,52 |
0,84 |
0,27 |
0,49 |
-1,62 |
-4,29 |
Протокол работы программы при n=10 (константа):
1. Начало программы
2. Начало цикла
3. i=1 присваивание значения A[i] «A[1]=(random-0,5)*10=-2,78»,
Вывод :A[1]=-2,78
4. i=2 присваивание значения A[i] «A[2]=(random-0,5)*10=-1,17»,
Вывод A[2]=-1,17
5. i=3 присваивание значения A[i] «A[3]=(random-0,5)*10= 3,05»,
Вывод A[3]= 3,05
6. i=48 присваивание значения A[i] «A[48]=(random-0,5)*10=2,23»,
Вывод A[48]=2,23
7. i=49 присваивание значения A[i] «A[49]=(random-0,5)*10=-1,04»,
Вывод A[49]=-1,04
8. i=50 присваивание значения A[i] «A[50]=(random-0,5)*10=-4,29»,
Вывод A[50]=-4,29
9. Конец цикла
10. Начало цикла
11. i=2 присваивание значения A[i] «A[2]=(A[1]+A[2]+A[3])= -0,30 »,
Вывод :A[2]= -0,30
12. i=3 присваивание значения A[i] « A[3]=(A[2]+A[3]+A[4]= 1,06 »,
Вывод A[3]=-0,42
13. i=4 присваивание значения A[i] «A[4]=(A[3]+A[4]+A[5]= -0,30»,
Вывод A[4]= -0,30
14. i=47 присваивание значения A[i] «A[47]=(A[46]+A[47]+A[48]= 0,27»,
Вывод A[47]=-0,27
15. i=48 присваивание значения A[i] «A[48]=(A[47]+A[48]+A[49]= 0,49»,
Вывод A[48]=0,49
16. i=49 присваивание значения A[i] «A[49]=(A[48]+A[49]+A[50]= -1,62 »,
Вывод A[49]=-1,62
17. Копия вывода на экран :
««Исходная последовательность: »
-2,78 |
-1,17 |
3,05 |
0,42 |
-2,39 |
3,16 |
0,86 |
0,99 |
1,39 |
3,18 |
-1,58 |
4,95 |
-3,23 |
1,44 |
3,25 |
1,51 |
-4,88 |
-1,35 |
-3,56 |
1,10 |
1,20 |
-0,34 |
4,29 |
3,07 |
-1,27 |
-4,77 |
-0,89 |
-0,82 |
4,59 |
-2,28 |
-0,91 |
2,04 |
-2,08 |
0,46 |
-0,59 |
0,25 |
2,68 |
-4,16 |
-0,42 |
4,44 |
4,71 |
4,09 |
4,32 |
0,92 |
-3,04 |
4,25 |
-2,25 |
2,23 |
-1,04 |
-4,29 |
«Измененная последовательность: »
-2,78 |
-0,30 |
1,06 |
-0,30 |
0,15 |
1,39 |
1,08 |
1,15 |
1,90 |
1,17 |
1.51 |
1,08 |
-0,24 |
1,48 |
2,08 |
-0,43 |
-2,22 |
-2,38 |
-1,61 |
0,23 |
0,36 |
1,44 |
2,93 |
1,58 |
-1,49 |
-2,39 |
-1,37 |
0,80 |
1,00 |
-0,76 |
0,12 |
0,03 |
-0,53 |
-0,22 |
-0,19 |
0,91 |
-0,19 |
-1,59 |
0,81 |
3,32 |
4,04 |
4,15 |
3,13 |
0,34 |
0,52 |
0,84 |
0,27 |
0,49 |
-1,62 |
-4,29 |
18. Остановка.
19. Конец программы.
Вывод Ai
Ai= (random-0,5)*10
Вывод Ai
Вывод A50
Конец
i=2, 49
Начало
Ai=(Ai-1+Ai+Ai+1)/3
i=1, 50