Лабораторная работа по информатике «Программирование на языке Pascal. Линейная алгоритмическая структура»

Лабораторная работа №1

по теме:

«Программирование на языке Pascal. Линейная алгоритмическая структура»

Задание №1

1. Запустите программу Pascal ABC.
2. Вспомните структуру программы

Program Stishok;

                  Uses CRT;

Begin

End.

3. Написать программу, которая выводит на экран четверостишие, используя для этого оператор вывода (Writeln)

Унылая пора! Очей очарованье!

Приятна мне твоя прощальная краса -

Люблю я пышное природы увяданье,

В багрец и золото одетые леса.

А. С. Пушкин

4. Запустите программу в отдельном окне, используя модуль Uses CRT.

Задание №2

1. Запустите программу Pascal ABC.
2. Вспомните структуру программы

Program Objom;

Var

Begin

End.

       3. Написать программу вычисления объема параллелепипеда, используя для этого операторы ввода-вывода (Write- Read):

Введите исходные данные:

L-длина (см) ->

b-ширина (см) ->

h-высота (см) ->

v-объём (куб.см) ->

               v:=l*b*h

4.Запустите программу в отдельном окне, используя модуль Uses CRT.

Задание №3

1.      Запустите программу Pascal ABC.

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

Program Pocupca;

Var

Begin

End.

3.      Написать программу вычисления стоимости покупки, состоящей из нескольких

      тетрадей и карандашей, используя для этого операторы ввода-вывода (Write- Read):

Введите исходные данные:

Сt -  Цена тетради (руб.) ->

Kt - Количество тетрадей (шт.) ->

Ck - Цена карандаша (руб.) ->

Kk - Количество карандашей (шт.) ->

Cx - Стоимость покупки (руб.)->

         cx:=ct*kt+ck*kk;

4.      Запустите программу в отдельном окне, используя модуль Uses CRT.

Запустите программу в отдельном окне, используя модуль Uses CRT.

Лабораторная работа №2

по теме:

«Программирование на языке Pascal. Линейная алгоритмическая структура»

Задание №1

1. Запустите программу Pascal ABC.
2. Вспомните структуру программы

Program Plochad;

Var

Begin

End.

       3. Написать программу вычисления площади параллелограмма, используя для этого операторы ввода-вывода (Write- Read):

Введите исходные данные:

L-длина (cм) ->

b-ширина (см) ->

S-площадь (кв.см) ->

s:=l*b

4.Запустите программу в отдельном окне, используя модуль Uses CRT.

Задание №2

1. Запустите программу Pascal ABC.
2. Вспомните структуру программы

Program Ves;

Var

Begin

End.

3. Написать программу вычисления стоимости некоторого количества (по весу)

      яблок,  используя для этого операторы ввода-вывода (Write- Read):

Введите исходные данные:

C1 - Цена одного килограмма яблок (руб.) ->

Kolich - Вес яблок (кг) ->

Cx - Стоимость покупки (руб.)->

cx:=c1*kolich;

4. Запустите программу в отдельном окне, используя модуль Uses CRT.

Задание №3.

1. Запустите программу Pascal ABC.
2. Вспомните структуру программы

Program Carta;

Var

Begin

End.

3. Написать программу вычисления расстояния между населенными пунктами, изображенными на карте, используя для этого операторы ввода-вывода (Write- Read):

Введите исходные данные:

M - Масштаб карты (количество километров в одном сантиметре) ->

S - Расстояние между точками, изображающими населенные пункты (см) ->

Sn - Расстояние между населенными пунктами ->

Sn:=S*M;

4. Запустите программу в отдельном окне, используя модуль Uses CRT.