Урок 16. Язык программирования Pascal

Цель урока: изучить среду программирования Pascal ABC, команду  вывода, понятие типа данных и оператор присваивания. 


Оператор присваивания предназначен для того, чтобы:

  • задавать значения переменным;
  • вычислять значения арифметического выражения (результат вычисления будет записан как значение переменной).

Формат записи оператора присваивания:

имя переменной := выражение;

Знак  := – символ присваивания, читается как присвоить значение

Арифметическое выражение – это последовательность числовых констант, переменных, математических функций, соединенных знаками арифметических операций и круглыми скобками.

Арифметические операции

 Операция  Название Запись в Pascal Пример
 + сложение + a + b
 вычитание,изменение знака  a – b
-a
 . умножение * a * b
 : деление / a / b

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

Для записи обыкновенной дроби используется знак деления. Знак умножения опускать нельзя. Целая часть дробного числа отделяется от дробной части точкой. 

Команда ввода служит для ввода данных с клавиатуры.

Формат команд:

Read(список ввода);
Readln(список ввода);

Список ввода – переменная или последовательность переменных, разделенных запятой.

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

Команда Readln после ввода осуществляет переход на новую строку.

Пример 1. Напишите программу, которая вычисляет сумму двух целых чисел a и b. Числа a и b вводятся с клавиатуры.

 program primer1;
    var a,b,s:integer;
 begin
    readln(a);
    readln(b);
    s:=a+b;
    writeln('Сумма =',s);
 end.

Пример 2. Напишите программу, которая определяет, если среди введенных чисел x, y и z хотя бы одно, которое больше 10 и выводит одно из сообщений: “Хотя бы одно из чисел x, y, z больше 10” или “Все числа меньше 10”.

program primer2;
  var x, y, z: integer;
begin
  readln(x, y, z);
  if (x > 10) or (y > 10) or (z > 10)
    then
      writeln('Хотя бы одно из чисел x,y,z больше 10')
    else
      writeln(' "Все числа меньше 10');
end.

Задания по теме урока

Если необходимо, скачайте и установите среду разработки PascalABC.NET (скачать)

Задание 1. Пользователь вводит свой возраст (x) в годах с клавиатуры. Определите, возраст пользователя в годах через 7 лет. Полученный результат выведите на экран.

Задание 2. Напишите программу, которая получает с клавиатуры два числа a и b. Затем необходимо число a увеличить в 5 раз, а число b уменьшить на 12. Полученные значения переменных выведите на экран.

Задание 3. Напишите программу, которая вычислит значение выражения:

Задание 4. Известно, что популяция косуль – К особей. Ежегодно популяция увеличивается на 2%. Напишите программу, которая определит, сколько особей будет в популяции через 1 год. Значение переменной K вводится с клавиатуры.

Дополнительное задание

Составьте программу, которая позволяет ввести с клавиатуры  значения переменных  x,y,z и проверяет истинность высказывания: “Хотя бы одно из чисел x, y, z положительно”.


Это изображение имеет пустой атрибут alt; его имя файла - hw-e1653285769766.png

Домашнее задание

§ 14.3-14.5 учебного пособия, ответить на вопросы


Форма отправки решений

Форма видна только зарегистрированным пользователям.

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *