Алгоритмика. 9 класс. Практическая работа на компьютерах в среде программирования Pascal

Практическая работа №2 Стоимость билета в салоне бизнес класса составляет х рублей, что в два раза выше стоимости билета в салонах экономического класса. Разработайте программу, которая вычислит сумму денег - S, полученную авиакомпанией от продажи билетов на этот рейс, если известно, что остались нераспроданными а билетов бизнес-класса и b билетов экономического класса.  Выделите все этапы решения этой задачи и опишите свои действия на каждом из них. Первый этап       Исходные данные: Требуется найти: S – общую сумму, полученную компанией от продажи билетов за рейс. Второй  этап Соотношения, связывающие исходные данные и результат: Для нахождения S можно вычислить значение следующего выражения:                   -  величины целого типа;                   – величина  вещественного  типа. Третий этап Блок – схема:

Четвертый этап Пишем программу на языке Pascal program z_12; var       : integer;      : real; begin writeln('Подсчёт суммы от продажи билетов'); writeln('                                         a='); readln(  ); writeln(                                          b='); readln(  ); writeln(                                          x='); readln(  ); s:=                           ; writeln('Билетов продано на',s,'руб'); end. Пятый  этап Отладка и тестирование: Протестируйте программу при следующих исходных данных: № Исходные данные Результат работы программы Требуемый результат Результат прохождения теста (да/нет) x а b 1 0 0 48,8 1 40 0 10,2 0 60 7 1 90

Практическая работа № 1 Уличный продавец газет получает a рублей с продажи каждой из 50 газет.. С продажи каждой из последующих газет он получает на 20% больше. Разработай программу, которая вычислит заработок продавца, продающего в день k газет. зафиксируй свои действия на каждом из этапов решения задачи. Первый этап       Исходные данные: а – 1,2*а – к –      Требуется найти: S – Второй  этап Соотношения, связывающие исходные данные и результат: Для нахождения S можно вычислить значение следующего выражения: S:= a и S -  величины вещественного типа к – величина  целого типа. Третий этап Блок – схема:

Четвертый этап Программа на языке Pascal program z_66; var k:         ; a,s:        ; begin writeln('Подсчёт заработка продавца'); writeln('Введите сумму, которую получает продавец                    :'); readln(   ); writeln('Введите количество газет, которые продавец                  :'); readln(   ); s:=                       ; writeln('Продавец получит',  ,'руб'); end. Пятый  этап Отладка и тестирование: Протестируйте программу при следующих исходных данных: № Исходные данные Результат работы программы Требуемый результат Результат прохождения теста (да/нет) а к 1 49 48,8 1 51 2 100 4 200

Практическая работа №2
Стоимость билета в салоне бизнес класса составляет х рублей, что в два раза выше стоимости билета в салонах экономического класса.
Разработайте программу, которая вычислит сумму денег - S, полученную авиакомпанией от продажи билетов на этот рейс, если известно, что остались нераспроданными а билетов бизнес-класса и b билетов экономического класса. 
Выделите все этапы решения этой задачи и опишите свои действия на каждом из них.

Первый этап

      Исходные данные:

¾ - 120   от 160

¼ - 40  от 160

Тогда:

(40-а) – количество проданных авиабилетов бизнес-класса по цене x за билет;

(120-b) – количество проданных авиабилетов эконом-класса по цене x/2 руб. за билет

Требуется найти:

S – общую сумму, полученную компанией от продажи билетов за рейс.

Второй  этап

Соотношения, связывающие исходные данные и результат:

Для нахождения S можно вычислить значение следующего выражения:

S:= (40-а)*x + (120-b)*x/2

a и b -  величины целого типа;

s – величина  вещественного  типа.

Третий этап

Блок – схема:

Четвертый этап

program z_12;

var a,b: integer; s,x: real;

begin

writeln('Подсчёт суммы от продажи билетов');

writeln('Количество  непроданных билетов бизнес-класса a=');

readln(a);

writeln('Количество  непроданных билетов эконом-класса b=');

readln(b);

writeln('Стоимость билетов бизнес-класса x=');

readln(x);

s:=(40-a)*x+(120-b)*x/2;

writeln('Билетов продано на',s,'руб');

end.

Пятый  этап

Отладка и тестирование:

Протестируйте программу при следующих исходных данных:

№	Исходные данные			Результат работы программы	Требуемый результат	Результат прохождения теста (да/нет)
	x	а	b
	1	0	0		48,8
	1	40	0		60
	10,2	0	60		714
	7	1	90		378

Практическая работа № 1

Уличный продавец газет получает a рублей с продажи каждой из 50 газет.. С продажи каждой из последующих газет он получает на 20% больше. Разработай программу, которая вычислит заработок продавца, продающего в день k газет. зафиксируй свои действия на каждом из этапов решения задачи.

Первый этап

      Исходные данные:

а – сумма, получаемая продавцом с продажи каждой из 50 газет;

1,2*а – сумма, получаемая продавцом с продажи каждой из последующих газет;

к – продано газет в день.

     Требуется найти:

S –общая сумма, с продажи  к  газет.

Второй  этап

Соотношения, связывающие исходные данные и результат:

Для нахождения S можно вычислить значение следующего выражения;

S:= 50*a+(k-50)*1,2*a

a и S -  величины вещественного типа

к – величина  целого типа.

Третий этап

Блок – схема:

 

Четвертый этап

Программа на языке Pascal

program z_66;

var k: integer; a,s: real;

begin

writeln('Подсчёт заработка продавца');

writeln('Введите сумму, которую получает продавец с продажи первых 50 газет:');

readln(a);

writeln('Введите количество газет, которые продавец продает в день k:');

readln(k);

s:=50*a+(k-50)*1.2*a;

writeln('Продавец получит',s,'руб');

end.

Пятый  этап

Отладка и тестирование:

Протестируйте программу при следующих исходных данных:

№	Исходные данные		Результат работы программы	Требуемый результат	Результат прохождения теста (да/нет)
	а	к
	1	49		48,8
	1	51		51,2
	2	100		220
	4	200		920

Краткое описание документа:

Информатика. Алгоритмика.

Раздаточный материал для разбора задачи №65 и №66 по рабочей тетради Босовой Л.Л. для учеников 9 класса.

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

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

Если допущены ошибки, то откорректировать.

Выполненную работу показать педагогу.