Если у вас возникли сложности с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой - мы готовы помочь.
Предоплата всего
Подписываем
Министерство образования Российской Федерации
Сибирского Государственного Технологического Университета
Факультет: Автоматизации и информационных технологий
Кафедра: Информационных технологий
Расчетная работа №21
По дисциплине «Алгоритмические языки и программирование»
Руководитель:
Якимов С.П.
(подпись)
Разработал:
Студент гр. 21-6
Прокопьев М.C.
(подпись)
Красноярск-2003.
Отчёт.
Вариант №8.
Задача № 201з
Даны натуральное число n, действительные числа , ..., . Получить :
-
Блочная схема программы:
Текст программы:
program Z_201z;
uses crt;
var
Result,min1,min2:real;
i,N:byte;
A:array[1..100]of real;
begin
clrscr;
writeln('Введите N:');
readln(N);
for i:=1 to N do
begin
writeln('Введите A[',i,']:');
readln(A[i]);
end;
min1:=A[1];
min2:=sqr(A[1]);
for i:=2 to N do
begin
if A[i]<min1 then
min1:=A[i];
if sqr(A[i])<min2 then
min2:=sqr(A[i]);
end;
Result:=sqr(min1)-min2;
writeln('Результат :',Result:8:3);
readln;
end.
|
№ |
Идентификатор Переменной |
Переменная предназначена для хранения значений |
|
1 |
I |
Переменной шага цикла |
|
2 |
A |
Массива |
|
3 |
A[i] |
Результатов вычислений |
|
4 |
Result |
Результатов вычислений |
|
5 |
Min2 |
Исходных данных |
|
6 |
Min1 |
Исходных данных |
|
7 |
N |
Исходных данных |
Контрольный пример:
N=4
А[1]=2
А[2]=3
А[3]=4
А[4]=5
«Результат : 0»
Протокол работы программы при n=4, A[1]=2, A[2]=3, A[3]=4, A[4]=5:
1. Печать сообщения: «Введите N: »
«4»
обработка строки: «4»: n=4
3. Начало цикла
4. i=1 ввод A[1]=2
5. i=2 ввод A[2]=3
6. i=3 ввод A[3]=4
7. i=4 ввод A[4]=5
8.Конец цикла
9. Присваивание:
«min1=A1 =2» «min2=sqr(A1) =4»
10. Начало цикла
Оператор цикла for
11. i=2, Проверка условия «A[2]<min1 = 3<2 »-False
12. i=2, Проверка условия «sqr(A[2])<min2 = 9< 4»-False
13. i=3, Проверка условия «A[3]<min1 = 3<2 »-False
14. i=3, Проверка условия «sqr(A[3])<min2 = 16< 4»-False
15. i=4, Проверка условия «A[4]<min1 = 5<2 »-False
16. i=4, Проверка условия «sqr(A[4])<min2 = 25< 4»-False
17. Конец цикла
18. Вычисление: «Result:=sqr(min1)-min2=4-4=0 », Result=0
19. Вывод на экран:
«Результат : 0 »
20. Остановка.
21. Конец программы.
Вывод result
result = min12-min2
Min2 =(Ai)2
Min1=Ai
да
Ai < min1
i=2, N
Ввод Ai
Min2 = (A1)2 , Min1 = A1
Конец
i=1, N
Ввод n
Начало
(Ai)2 <min2
нет