Функции Pred, Succ в Pascal.

В данном уроке мы рассмотрим функции, применяемые к типу CHAR. Функция Pred возвращает в качестве значения предшествующий символ, а функция Succ возвращает последующий символ.

Процедура Writeln в Pascal

Помимо зарезервированного слова Write, для вывода сообщения на экран в Pascal используется процедура Writeln. Отличие процедуры Writeln от оператора Write заключается в том, что Writeln после вывода сообщения на экран переводит курсор на другую ...

Div, Mod, сложение, вычитание в Pascal.

Помимо операций умножения и сложения, над целочисленными переменными производятся операции Div (операция целочисленного деления), Mod (вычисление остатка от целочисленного деления), операция вычитания «-».

Циклы и массивы

ЗАПИСИ. ТИП ДАННЫХ RECORD.

В описании данных и связей между ними используют понятия: запись логическая и запись физическая. Физическое описание данных определяет способ их хранения во внешней памяти ЭВМ. Логическое описание ...

Манипулирование строками STRING.

В языке Паскаль при работе с текстами чаще всего используются короткие строки типа STRING. Стандартные процедуры READLN(St), WRITE(St) и WRITELN(St) поддерживают ввод и вывод строк переменной длины ...

Напишем программу, в которой мы будем вводить с клавиатуры значения температур для каждого месяца и посчитаем среднюю температуру за год.

 Использование массивов.


  1. program massiv2;
  2. uses crt;
  3. var
  4.   mes: array [1..12] of integer;
  5.   i: integer;
  6.   sredtemp: real;
  7. begin
  8. clrscr;
  9. for I:=1 to 12 do
  10. begin
  11.    write ('Введите температуру ',I, ' месяца ');
  12.    readln (mes[I]);
  13. end;
  14. sredtemp:=0;
  15. for I:=1 to 12 do
  16. begin
  17.  sredtemp:=sredtemp+mes[I]
  18. end;
  19. sredtemp:=sredtemp/12;
  20. write ('Средняя температура за год ',sredtemp:3:2);
  21. readln
  22. end.

В строке №4 записываем массив.

В строке №5 вводим переменную «i». Практически во всех программах для работы с массивами необходимы и циклы. Переменную «i» будем использовать в качестве счетчика для цикла.

В строке №6 записываем переменную для хранения значения средней температуры.

В строке №9 записываем цикл. Напомню, что если в цикле нам необходимо повторить более одного оператора, то эти операторы заключаются в операторные скобки begin .. end. В нашей программе нам необходимо вывести на экран сообщение 12 раз (строка №11) и ввести с клавиатуры значение 12 раз (строка №12). Соответственно, эти строки должны находиться внутри конструкции begin..end.

В строке №11 выводим на экран сообщение «ВВЕДИТЕ ТЕМПЕРАТУРУ».  Потом указывается значение переменной «I». В цикле, оно будет принимать значения  от 1 до 12. В конце дописываем сообщение «МЕСЯЦА»

В строке №12 вводим с клавиатуры значение температуры для каждого элемента массива, т.е. всего мы введем 12 значений.

В строке №14 обнулим среднюю температуру. Скажу несколько слов об этом обнулении. Когда мы создали переменную «sredtemp», под эту переменную автоматически выделяется 6 байт в памяти компьютера. Эти 6 байт ничем не заполняются, то есть первоначально там ничего нет. Если, например, мы запишем sredtemp:=345, то память заполнится числом 345. Или, например, у нас есть переменные «sredtemp», в которой записано число 25 и «A», в которой записано число 75, тогда при sredtemp:=sredtemp+A переменная «sredtemp» перезапишется. Вместо числа 25 в нее запишется число 100. Новое значение переменной «sredtemp» (число 100) получается путем прибавления к старому значению этой переменной (25) значения переменной «A» (75). В нашем примере, переменная «sredtemp» перезаписывается, путем прибавления к старому значению этой переменной значения элемента массива (строка №17). Значение элемента массива у нас есть (мы вводим это значение с клавиатуры), но нам нужно знать и старое значение переменной «sredtemp», а без строки №14 мы его бы не знали.

В строке №15 пишем цикл для подсчета суммы всех температур.

Строка №17. Средняя температура равна сумме старого значения температуры и значения I-го элемента массива. Благодаря циклу, в переменную «sredtemp» запишется сумма всех элементов массива (т.е. сумма всех температур, которые мы вводим с клавиатуры).

Строка №19. Подсчитываем среднюю температуру путем деления суммы температур всех месяцев на количество этих месяцев.

Следует сказать, что операторные скобки (строка №16 и №18) здесь не обязательны, т.к. в цикле (строка №15) выполняется лишь один оператор (строка №17).

massivih v paskalj..

После запуска программы введите 12 значений для температуры.

massivih v paskalj...


Предыдущая статья : Массивы в Pascal.

Оглавление : Уроки Паскаль.

Следующая статья : Использование массивов. Продолжение.


Комментарии  

 
+2 # Юрий 22.03.2012 17:21
Здравствуйте! Продолжаю проявлять полученные навыки :) В строке 13 примера 28, на мой взгляд, рано ставить точку.
 
 
+3 # Administrator 23.03.2012 17:12
Да,совершенно верно, спасибо за подсказку, сейчас исправлю.
 
 
0 # 1640max 05.02.2013 19:33
Но эту прогу можно написать с применением for и без массивов :sigh:
 
 
+1 # Антон 24.02.2013 21:23
Ну раз уж тут речь идет о массивах...
 
 
-1 # призрак 25.02.2013 06:04
паскаль реальная хрень :lol:
 
 
-2 # WARRIOR 25.02.2013 06:05
8)
 
 
0 # lolhlk 25.02.2013 06:07
;-)
 
 
0 # windous 25.02.2013 06:10
паскаль рулит 8) ;-) :P
 
   ГлавнаяПаскальМассивы в ПаскальИспользование массивов.