Операции умножения и сложения в Pascal.

В данном уроке мы рассмотрим операции умножения и сложения в Pascal. Умножение в Pascal обозначается знаком «*», а сложение - знаком «+».

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

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

Abs, Sqr в Pascal.

Abs - функция языка Паскаль, которая вычисляет модуль числа.
Sqr - функция языка Паcкаль, которая возводит число в квадрат.

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

Программирование данных.

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

Инициализация одномерного массива.

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

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

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


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