Проектная работа по информатике: "Тестирующая программа «Сложение чисел с разными знаками»

Приложение 1.

Приложение 2.

rogram sloshenie;

Uses graphABC;

Var a,b,c,d:integer;e,f,n: byte; p:real;

Begin

SetFontColor(clBlue);

SetFontSize(13);

SetFontStyle(fsItalic);

E:=0;

Writeln('Выберите количество примеров.');

Read(n);

Writeln('Выполните действия. Введите ответ и нажмите Enter.');

for f := 1 to n do

Begin

A:=random (200)-100;

B:=random (200)-100;

Write(a,' + ',b,' = ');

Read(c);

Write(c);

D:=a+b;

If c=d then

Begin

Writeln('  Верно.');

E:=e+1;

End

Else

Writeln('  Неверно.');

Writeln;

End;

Writeln('Правильные ответы: ',e);

P:=e/n*100;

Writeln('Ваш результат - ',p,'%');

If p=100 then

Writeln ('Ваша оценка - 5.');

If (p>74) and (p<100) then

Writeln ('Ваша оценка - 4.');

If (p>49) and (p<75) then

Writeln ('Ваша оценка - 3.');

If p<50 then

Writeln ('Ваша оценка - 2.');

Readln

End.

Приложение 3

МУНИЦИПАЛЬНОЕ БЮДЖЕТНОЕ ОБЩЕОБРАЗОВАТЕЛЬНОЕ УЧРЕЖДЕНИЕ

СРЕДНЯЯ ОБЩЕОБРАЗОВАТЕЛЬНАЯ ШКОЛА № 7

им. историка, профессора Н. И. Павленко г. Ейска МО Ейский район

Школьная конференция проектных и исследовательских работ

секция «Физико-математический цикл»

Тестирующая программа «Сложение чисел с разными знаками»

Выполнила:

ученица 6 «В» класса

МБОУ СОШ № 7

г. Ейска МО Ейский район

Ткаченко Марина

Руководитель:

учитель информатики

Ткаченко А. Н.

2018г.

Оглавление

Введение. 3

Часть первая. 4

Основные сведения о программе PascalABC.net. 4

Структура программы: 4

Основные операторы языка Паскаль. 5

Часть вторая. 7

Формулировка условия и выбор способа реализации проекта. 7

Построение математической модели. 7

Блок-схема алгоритма. 9

Программный код. 10

Результат работы программы: 11

Вывод: 11

Используемая литература. 11

Введение

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

В 6 классе на уроках математики мы познакомились с отрицательными числами, изучили арифметические действия с числами с разными знаками и писали по ним контрольную работу. Но перед контрольной работой очень важно потренироваться, это поможет лучше подготовиться. Я хочу создать программу тренажер, задающую и проверяющую примеры на сложение целых чисел Тренажер – это тренировочные однотипные упражнения, подобранные по одной теме, и направленные на отработку вычислительных навыков до автоматизма. Эта программа поможет мне лучше усвоить тему, а так же я могу предложить ее своим одноклассникам. Ведь тренироваться за компьютером, когда ты сразу видишь свои ошибки интереснее.

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

Задачи:

·        построить математическую модель задачи;

·        начертить блок схему;

·        написать программный код на языке программирования;

·        отладить  программу.

Форма проекта

меж предметный

Вид проекта

индивидуальный

Часть первая

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

Основные сведения о программе PascalABC.net.

PascalABC.NET – это система программирования и язык Pascal нового поколения для платформы Microsoft.NET. Язык PascalABC.NET содержит все основные элементы современных языков программирования: модули, классы, перегрузку операций, интерфейсы и многое другое. Система PascalABC.NET включает в себя также простую интегрированную среду, ориентированную на эффективное обучение современному программированию, обеспечивает подсветку синтаксиса, подсказку по коду (подсказка по точке, подсказка параметров подпрограмм, всплывающая подсказка по коду), форматирование текста программы по запросу, переход к определению и реализации имени. PascalABC.NET опирается на передовую платформу программирования Microsoft.NET, которая обеспечивает язык PascalABC.NET огромным количеством стандартных библиотек и позволяет легко сочетать его с другими .NET-языками: C#, Visual Basic.NET, управляемый C++ и др.[4]

Структура программы:

Программа на языке PascalABC.NET имеет следующий вид:

program имя программы;

uses раздел описаний

begin

операторы

end.

Первая строка называется заголовком программы и не является обязательной.

Раздел uses начинается с ключевого слова uses, за которым следует список имен модулей и пространств имен .NET, перечисляемых через запятую.

Раздел описаний может включать следующие подразделы:

• раздел описания переменных
• раздел описания констант
• раздел описания типов
• раздел описания меток
• раздел описания процедур и функций

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

Далее следует блок begin/end, внутри которого находятся операторы, отделяемые один от другого символом "точка с запятой". Раздел uses и раздел описаний могут отсутствовать [4]

Основные операторы языка Паскаль.

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

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

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

Оператор присваивания заменяет текущее значение переменной значением выражения.

Ввод данных:

Для ввода исходных данных чаще всего используется процедура ReadLn: ReadLn(A1,A2,...AK);

Процедура производит чтение К значений исходных данных и присваивает эти значения переменным А1, А2, ..., АК. При вводе исходных данных происходит преобразование из внешней формы представления во внутреннюю, определяемую типом переменных. Значения исходных данных могут отделяться друг от друга пробелами и нажатием клавиш табуляции и Enter. Не допускается разделение вводимых чисел запятыми!

Вывод данных:

Для вывода результатов работы программы на экран используются процедуры:

Write(A1,A2,...AK); WriteLn(A1,A2,...AK);

Первый из этих операторов производит вывод значений переменных А1, А2,...,АК в строку экрана. Второй оператор, в отличие от первого, не только производит вывод данных на экран, но и производит переход к началу следующей экранной строки. Если процедура writeln используется без параметров, то она просто производит пропуск строки и переход к началу следующей строки.

Условный оператор:

Условный оператор имеет полную и краткую формы.

Полная форма условного оператора выглядит следующим образом:

if условие then оператор 1 else оператор2

В качестве условия указывается некоторое логическое выражение. Если условие оказывается истинным, то выполняется оператор 1, в противном случае выполняется оператор2.

Краткая форма условного оператора имеет вид:

if условие then оператор

Если условие оказывается истинным, то выполняется оператор, в противном случае происходит переход к следующему оператору программы.

For, или цикл с параметром

For— это цикл, в котором тело выполняется заданное количество раз.

for <параметр> := <начальное значение> to <конечное_значение> do <оператор1>;

После каждой итерации значение <параметр> будет увеличиваться на единицу. Как только значение <начальное значение> станет больше <конечное_значение>, выполнение цикла прекратится.

Если требуется написать несколько операторов в теле цикла, используем операторные скобки begin и end. Переменные  <параметр>, <конечное_значение> и <начальное значение> —  переменные целого типа. Изменять значение счетчика внутри тела нельзя!

Часть вторая.

Формулировка условия и выбор способа реализации проекта.

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

Построение математической модели.

Переменные а, в, с, d - целые числа, как положительные, так и отрицательные, поэтому тип данных для них – integer (-32 768 … 32 767). Переменные F (параметр цикла), n (количество примеров), е (количество правильно решенных примеров) мы используем для счета, следовательно, это целые положительные числа, зададим тип данных byte (0…255). P - проценты, вещественное число, тип данных real.

Датчик случайных чисел - это стандартная функция. На языке  Паскаль она записывается следующим образом: random (в - а) +а . Здесь а и в - целые числа. Результат работы  функции -  целое число в диапазоне от а до в.

Так как количество примеров может быть любым, то для оценки знаний мы используем проценты, с которыми мы тоже познакомились в этом году на уроке математики. Если ученик справился с половиной (50%) примеров тренажер выставит оценку 3, если выполнено свыше ¾ части (75 %)  примеров то оценка 4.Оценка 5 выставляется, если все примеры выполнены верно.

Обозначим за N – количество примеров, выполненное учащимся.

Е – количество правильно выполненных примеров. Чтобы выставить оценку мы должны количество правильно решенных примеров разделить на общее количество примеров и умножить на 100%.

Р = е / n* 100%

Выводить результаты работы я буду в графическом окне  uses graphabc. Для работы с фоном и шрифтом мне понадобятся следующие процедуры:

procedure SetFontSize(size: integer);

        Устанавливает размер текущего шрифта в пунктах 

procedure SetFontName(name: string);

        Устанавливает имя текущего шрифта 

procedure SetFontColor(c: Color);

        Устанавливает цвет текущего шрифта 

procedure SetFontStyle(fs: integer);

Устанавливает стиль текущего шрифта [4]

Интерфейс программы простой. Программа просит ввести количество примеров, и дает команду к выполнению действий.

Блок-схема алгоритма.

 

Программный код.

Program sloshenie;

Uses graphABC;

Var a,b,c,d,e,f,n:integer; p:real;

Begin

SetFontColor(clBlue);

SetFontSize(13);

SetFontStyle(fsItalic);

E:=0;

Writeln('Выберите количество примеров.');

Read(n);

Writeln('Выполните действия. Введите ответ и нажмите Enter.');

for f := 1 to n do

Begin

A:=random (200)-100;

B:=random (200)-100;

Write('(',a,') + (',b,') = ');

Read(c);

Write(c);

D:=a+b;

If c=d then

Begin

Writeln('  Верно.');

E:=e+1;

End

Else

Writeln('  Неверно.');

Writeln;

End;

Writeln('Правильные ответы: ',e);

P:=e/n*100;

Writeln('Ваш результат - ',p:5:2,'%');

If p=100 then

Writeln ('Ваша оценка - 5.');

If (p>74) and (p<100) then

Writeln ('Ваша оценка - 4.');

If (p>49) and (p<75) then

Writeln ('Ваша оценка - 3.');

If p<50 then

Writeln ('Ваша оценка - 2.');

Readln

End.

Результат работы программы:

Вывод:

Я добилась того чего хотела. Мне понравилась полученная программа. Я смогу сама отрабатывать навыки выполнения операции сложения и предложить программу одноклассникам. В дальнейшем я планирую доработать программу, чтобы можно было выполнять все 4 арифметические операции, а также работать с дробными числами.

Используемая литература

1.     Ушаков Д. М., Юркова Е. А. Паскаль для школьников. – СПб.: Питер, 2008. – 256с.

2.     Семакин И. Г., А. П. Шестаков Основы программирования: Учебник для сред. проф. образования. - М.: Издательский центр «Академия», 2003. – 432с

3.     Культин Н. Б. Turbo Pascal в задачах и примерах. – СПб.: БХВ-Петербург, 2001. – 256.

4.     Встроенный справочник системы программирования PascalABC.NET

• 1 слайд

  Тестирующая программа «Сложение чисел с разными знаками»
  Выполнила ученица 7 «В» класса Ткаченко Марина.
  Руководитель Ткаченко Аксана Николаевна.
  

• 2 слайд

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

• 3 слайд

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

• 4 слайд

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

• 5 слайд

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

• 6 слайд

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

• 7 слайд

  Переменные а, в, с, d - целые числа, как положительные, так и отрицательные, поэтому тип данных для них – integer (-32 768 … 32 767). Переменные F (параметр цикла), n (количество примеров), е (количество правильно решенных примеров) мы используем для счета, следовательно, это целые положительные числа, зададим тип данных byte (0…255). P - проценты, вещественное число, тип данных real.
  Построение математической модели.
  

• 8 слайд

  Датчик случайных чисел - это стандартная функция. На языке Паскаль она записывается следующим образом: random (в - а) +а . Здесь а и в - целые числа. Результат работы функции - целое число в диапазоне от а до в.
  

• 9 слайд

  Так как количество примеров может быть любым, то для оценки знаний мы используем проценты, с которыми мы тоже познакомились в 6 классе на уроке математики.
  Если ученик справился с половиной (50%) примеров тренажер выставит оценку 3, если выполнено свыше ¾ части (75 %) примеров то оценка 4.Оценка 5 выставляется, если все примеры выполнены верно.
  

• 10 слайд

  Обозначим за N – количество примеров, выполненное учащимся.
  Е – количество правильно выполненных примеров. Чтобы выставить оценку мы должны количество правильно решенных примеров разделить на общее количество примеров и умножить на 100%.
  
  Р = е / n* 100%
  

• 11 слайд

  Для работы с фоном и шрифтом мне понадобятся следующие процедуры:
  procedure SetFontSize(size: integer);
  Устанавливает размер текущего шрифта в пунктах
  procedure SetFontName(name: string);
  Устанавливает имя текущего шрифта
  procedure SetFontColor(c: Color);
  Устанавливает цвет текущего шрифта
  procedure SetFontStyle(fs: integer);
  Устанавливает стиль текущего шрифта
  

• 12 слайд

• 13 слайд

  Program sloshenie;
  Uses graphABC;
  Var a,b,c,d,e,f,n:integer; p:real;
  Begin
  SetFontColor(clBlue);
  SetFontSize(13);
  SetFontStyle(fsItalic);
  E:=0;
  Writeln('Выберите количество примеров.');
  Read(n);
  Writeln('Выполните действия. Введите ответ и нажмите Enter.');
  for f := 1 to n do
  Begin
  A:=random (200)-100;
  B:=random (200)-100;
  Write('(',a,') + (',b,') = ');
  Read(c);
  Write(c);
  D:=a+b;
  If c=d then
  Begin
  Writeln(' Верно.');
  E:=e+1;
  End
  Else
  Writeln(' Неверно.');
  Writeln;
  End;
  Writeln('Правильные ответы: ',e);
  P:=e/n*100;
  Writeln('Ваш результат - ',p:5:2,'%');
  If p=100 then
  Writeln ('Ваша оценка - 5.');
  If (p>74) and (p<100) then
  Writeln ('Ваша оценка - 4.');
  If (p>49) and (p<75) then
  Writeln ('Ваша оценка - 3.');
  If p<50 then
  Writeln ('Ваша оценка - 2.');
  Readln
  End.
  

• 14 слайд

• 15 слайд

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