СДЕЛАЙТЕ СВОИ УРОКИ ЕЩЁ ЭФФЕКТИВНЕЕ, А ЖИЗНЬ СВОБОДНЕЕ

Благодаря готовым учебным материалам для работы в классе и дистанционно

Скидки до 50 % на комплекты
только до 07.06.2025

Готовые ключевые этапы урока всегда будут у вас под рукой

Организационный момент

Проверка знаний

Объяснение материала

Закрепление изученного

Итоги урока

Программирование на ЯП Паскаль. Урок-2

Категория: Информатика

Нажмите, чтобы узнать подробности

Начало программирования на ЯП Паскаль. Урок-2

Просмотр содержимого документа
«Программирование на ЯП Паскаль. Урок-2»

Программирование  на языке Паскаль УРОК 2

Программирование на языке Паскаль

УРОК 2

Вычисление математических выражений в ABC Pascal  Приоритет выполнения операций в ABC Pascal такой же, как и в математике.   Достаточно только научиться правильно записывать математические выражения на языке Pascal

Вычисление математических выражений в ABC Pascal

Приоритет выполнения операций в ABC Pascal такой же, как и в математике.

Достаточно только научиться правильно записывать математические выражения на языке Pascal

Арифметические действия Операция Наименование А+В Сложение А-В Вычитание А*В Умножение A/B Деление (только для вещественного типа) А div B Вычисление целой части (неполного частного) A mod B Вычисление остатка Вычисли:  10 div 3   18 mod 4

Арифметические действия

Операция

Наименование

А+В

Сложение

А-В

Вычитание

А*В

Умножение

A/B

Деление (только для вещественного типа)

А div B

Вычисление целой части (неполного частного)

A mod B

Вычисление остатка

Вычисли:

10 div 3 18 mod 4

Примеры Математическая запись Запись на языке Pascal 37(25+87,5)-17(4,6+1,9) 37*(25+87.5)-17*(4.6+1.9) a*b/c+d*d*d*d ( a +2* b-3*c)/(5*a+4) ( a+b)/(a-b)+a*b/3.14 Десятичная запятая в Pascal обозначается точкой

Примеры

Математическая запись

Запись на языке Pascal

37(25+87,5)-17(4,6+1,9)

37*(25+87.5)-17*(4.6+1.9)

a*b/c+d*d*d*d

( a +2* b-3*c)/(5*a+4)

( a+b)/(a-b)+a*b/3.14

Десятичная запятая в Pascal обозначается точкой

Стандартные функции Функция Паскаля Математическая запись Abs(x) Название | Х | Sqr(x) Абсолютная величина числа Х (модуль) Х 2 Exp(x) Возведение числа в квадрат e x Sqrt (x) Frac (x) Экспонента Вычисление квадратного корня Round (x) Вычисляет дробную часть числа Trunc (x) Округляет до ближайшего целого числа Отсекает дробную часть Определите  результат: Frac(16.68); Round(16.68); Trunc(16.68);

Стандартные функции

Функция Паскаля

Математическая запись

Abs(x)

Название

| Х |

Sqr(x)

Абсолютная величина числа Х (модуль)

Х 2

Exp(x)

Возведение числа в квадрат

e x

Sqrt (x)

Frac (x)

Экспонента

Вычисление квадратного корня

Round (x)

Вычисляет дробную часть числа

Trunc (x)

Округляет до ближайшего целого числа

Отсекает дробную часть

Определите результат:

Frac(16.68); Round(16.68); Trunc(16.68);

Стандартные функции Функция Паскаля Математическая запись Sin(x) Название sinx Cos(x) Int(x) Вычисление синуса с osx Ln(x) Вычисление косинуса [x] Exp(y*ln(x)) Целая часть числа Ln x Вычисление натурального логарифма х y Random(x) Возведение числа в степень Pi Возвращает случайное число в диапазоне от 0 до Х Число π

Стандартные функции

Функция Паскаля

Математическая запись

Sin(x)

Название

sinx

Cos(x)

Int(x)

Вычисление синуса

с osx

Ln(x)

Вычисление косинуса

[x]

Exp(y*ln(x))

Целая часть числа

Ln x

Вычисление натурального логарифма

х y

Random(x)

Возведение числа в степень

Pi

Возвращает случайное число в диапазоне от 0 до Х

Число π

Градусы в Pascal нужно перевести в радианы = 30* pi/180 Математическая запись Запись на языке Pascal

Градусы в Pascal нужно перевести в радианы

=

30* pi/180

Математическая запись

Запись на языке Pascal

:= выражение ; Пример 1 : count : = 10 ; numberOfItems : = 999 ; istance : = 780.8 ; Пример 2 : speedOfCar : = 65; timeOfTrip : = 3.5; distanceOfTrip : = speedOfCar * timeOfTrip; " width="640"

Операторы ЯП Pascal ABC

Оператор присваивания

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

Пример 1 :

count : = 10 ; numberOfItems : = 999 ;

istance : = 780.8 ;

Пример 2 :

speedOfCar : = 65; timeOfTrip : = 3.5;

distanceOfTrip : = speedOfCar * timeOfTrip;

 Какие операторы неправильные?  program qq;  var a, b: integer;    x, y: real;   begin   a := 5;  10 := x;  y := 7 , 8;  b := 2.5;  x := 2*(a + y);   a := b + x;  end. имя переменной должно быть слева от знака := целая и дробная часть отделяются точкой нельзя записывать вещественное значение в целую переменную

Какие операторы неправильные?

program qq;

var a, b: integer;

x, y: real;

begin

a := 5;

10 := x;

y := 7 , 8;

b := 2.5;

x := 2*(a + y);

a := b + x;

end.

имя переменной должно быть слева от знака :=

целая и дробная часть отделяются точкой

нельзя записывать вещественное значение в целую переменную

 Оператор ввода read ( a );  { ввод значения переменной a} read ( a, b );  { ввод значений переменных a и b} Как вводить два числа?  через пробел:  25 30  через Enter :  25  30 a 25 b 30 a 25 b 30 10 10

Оператор ввода

read ( a ); { ввод значения переменной a}

read ( a, b ); { ввод значений переменных a и b}

Как вводить два числа?

через пробел:

25 30

через Enter :

25

30

a

25

b

30

a

25

b

30

10

10

10 Оператор вывода write ( a );   { вывод значения переменной a} write ln ( a );  { вывод значения переменной a и переход на новую строчку } writeln ( ' Привет! ' );  { вывод текста } writeln ( ' Ответ: ', c );   { вывод текста и значения переменной c} writeln ( a, '+', b, '=', c ); 10 10

10

Оператор вывода

write ( a ); { вывод значения переменной a}

write ln ( a ); { вывод значения переменной a и переход на новую строчку }

writeln ( ' Привет! ' ); { вывод текста }

writeln ( ' Ответ: ', c ); { вывод текста и значения переменной c}

writeln ( a, '+', b, '=', c );

10

10

10 Сложение двух чисел Задача. Ввести два целых числа и вывести на экран их сумму. Простейшее решение:  program qq;  var a, b, c: integer;  begin  read ( a, b );  c := a + b;  writeln ( c );  end. 10 10

10

Сложение двух чисел

Задача. Ввести два целых числа и вывести на экран их сумму.

Простейшее решение:

program qq;

var a, b, c: integer;

begin

read ( a, b );

c := a + b;

writeln ( c );

end.

10

10

10 Полное решение  program qq;  var a, b, c: integer;  begin  writeln(' Введите два целых числа ');  read ( a, b );  c := a + b;  writeln ( a, '+', b, '=', c );  end. компьютер Протокол :  Введите два целых числа  25 30  25+30=55 пользователь 10 10

10

Полное решение

program qq;

var a, b, c: integer;

begin

writeln(' Введите два целых числа ');

read ( a, b );

c := a + b;

writeln ( a, '+', b, '=', c );

end.

компьютер

Протокол :

Введите два целых числа

25 30

25+30=55

пользователь

10

10

ВЫЧИСЛИТЬ: 12 div 4 = 1 9  div 5 = 12 mod 3 = 1 36  mod 10 =

ВЫЧИСЛИТЬ:

12 div 4 =

1 9 div 5 =

12 mod 3 =

1 36 mod 10 =

На Паскале На языке математики Sqrt(x) Модуль числа х Abs(x) Возведение в квадрат числа х Trunc(x) Sqr(x) е х Round(x) Вычисление дробной части Корень квадратный из х Frac(x) Округляет до ближайшего целого числ Exp(x) Random(x) Отсекает дробную часть Sin(x) Синус х Exp/y*ln(x)) Возвращает случайное число от 0 до х Cos(x) Косинус х Ln(x) [ х ] Int(x)  Pi х у Ln x

На Паскале

На языке математики

Sqrt(x)

Модуль числа х

Abs(x)

Возведение в квадрат числа х

Trunc(x)

Sqr(x)

е х

Round(x)

Вычисление дробной части

Корень квадратный из х

Frac(x)

Округляет до ближайшего целого числ

Exp(x)

Random(x)

Отсекает дробную часть

Sin(x)

Синус х

Exp/y*ln(x))

Возвращает случайное число от 0 до х

Cos(x)

Косинус х

Ln(x)

[ х ]

Int(x)

Pi

х у

Ln x

Задание 1. Вычислить длину окружности и площадь круга по заданному радиусу 2. Вычислить периметр прямоугольного треугольника по его катетам

Задание

1. Вычислить длину окружности и площадь круга по заданному радиусу

2. Вычислить периметр прямоугольного треугольника по его катетам


Скачать

Рекомендуем курсы ПК и ППК для учителей

Вебинар для учителей

Свидетельство об участии БЕСПЛАТНО!

Поделитесь с друзьями
ВКонтактеОдноклассникиTwitterМой МирLiveJournalGoogle PlusЯндекс