Решение практической задачи на паскале

Оглавление 

1. Текст задания.
2. Алгоритм выполнения задания в виде блок-схемы.
3. Исходный текст программы.
4. Сеансы работы программы.
5. Выводы по результатам работы программы.
6. Список литературы и Интернет-ресурсов.

 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

Текст задания 

Известна  температура каждого дня апреля. Определить самую тёплую декаду (в  апреле 3 декады по 10 дней), указав её среднюю  температуру. Учесть, что таких декад  может быть несколько. Для каждой из самых тёплых декад определить среднюю температуру. 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

Алгоритм  выполнения задания в виде блок-схемы 
 
 

 

Исходный текст программы. 

var  
a:array[1..30] of integer;  
i,p,pmax:integer;  
begin  
for i:=1 to 30 do  
read(a[i]);  
for i:=1 to 10 do  
p:=p+a[i];  
if p>pmax then pmax:=p;  
p:=0;  
for i:=10 to 20 do  
p:=p+a[i];  
if p>pmax then pmax:=p;  
p:=0;  
for i:=21 to 30 do  
p:=p+a[i];  
if p>pmax then pmax:=p;  
p:=0;  
writeln('Самая тёплая декада: ',pmax);  
write('Её средняя температура: ',pmax/10);  
end. 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

Сеансы  работы программы.

 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

Выводы  по результатам работы программы.

Обобщая результаты работы программы, делаем вывод, что задача решена правильно. 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

Список  литературы и Интернет-ресурсов.

1. Могилев А.В. и др. «Информатика». – М., 1999. – 816 с.
2. Шауцукова.Л.З. Информатика.
3. И.А. Бабушкина, Н.А. Бушмелева, С.М. Окулов, С.Ю. Черных «Практикум по Турбо Паскалю».
4. Ф.С.Воройский. «Информатика. Энциклопедический словарь-справочник: введение в современные информационные и телекоммуникационные технологии в терминах и фактах». 2006. 768 стр. 
5. Иванова Г.С. «Основы программирования. Учебник для вузов. 2-изд. перераб. и дополн. Из серия: Информатика в техническом университете». 417 стр. 
6. В.А.Каймин. «Информатика». Учебник. 2001 год. 286 стр.
7. Могилев, Пак, Хённер. «Практикум по информатике». 2005 год. 600 стр.
8. Савельев А.Я. «Основы информатики». Учебное. пособие. 2001 год.
9. Джонс Ж., Харроу К. «Решение задач в системе Турбо-Паскаль». - М.: Финансы и статистика, 1991. - 720 с.
10. Климов Ю.С., Касатин А.И., Мороз С.М. «Программирование в среде TURBO PASCAL». - Минск: 1992. - 158 с.
11. Шарикова Т.Г., Дружинин А.В. «Основы практического программирования на языке Паскаль»: Учебное пособие. 2000 г. – 66 с.