Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Курсовая работа (Багаутдинов Р.М.).doc
Скачиваний:
22
Добавлен:
18.03.2015
Размер:
2.55 Mб
Скачать

2.1.2 Словесно формульное описание задачи

1. Считать ввод числа с клавиатуры числа в переменную A, перейти к п. 2.

2. Считать ввод числа с клавиатуры числа в переменную B, перейти к п. 3.

3. Если сумма введенных углов больше или равна 180 градусам, вывести на экран сообщение “ Треугольник с такими углами не существует ” и перейти к пункту 6.

4. Если сумма введенных углов меньше 180 градусов, вывести на экран сообщение “ Треугольник с такими углами существует ” и перейти к пункту 5.

5. Если сумма введенных углов равна 90 градусам или один из углов А или Bравен 90 градусам, вывести на экран сообщение “ Треугольник с такими углами является прямоугольным” и перейти к пункту 6, в противном случае вывести на экран сообщение “ Треугольник с такими углами не является прямоугольным” и перейти к пункту 6.

6. Конец программы.

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

2.1.4 Реализация алгоритма на языке Pascal

Program Zadacha3;

uses crt;

var A,B:real;

Begin

write('Введите через пробел два угла треугольника A и B: ');

readln(A,B);

If (A+B<180) then

begin

writeln('Треугольник с углами A =',A:5:2,' B =', B:5:2,' существует');

if (A+B=90) or (A=90) or (B=90) then

writeln('Треугольник с углами A =',A:5:2,' B =', B:5:2,' является прямоугольным')

else writeln('Треугольник с углами A =',A:5:2,' B =', B:5:2,' не вляется прямоугольным');

end

Else writeln('Треугольник с углами A =',A:5:2,' B =', B:5:2,' не существует');

readln;

End.

2.1.5 Тестирование алгоритма задачи

2.2 Задача 4 (2.9)

Определить, является ли целое число Nчетным двузначным числом.

2.2.1 Математическое описание задачи

Постановка задачи.

Чётность в теории чисел это – характеристика целого числа, определяющая его способность делиться нацело на два. Соответственно четными числами будут −8, −6,−4, −2, 0, 2, 4, 6, 8, … и т. д.

Двузначные числа имеют диапазон 10, 11, 12, 13, 14, 15,…99. То есть имеют 2 цифры в числе.

Чтобы определить является число четным или нет, будем использовать функцию mod(Nmod2), которая будет делить наше число напополам и вычислять остаток от деления, если остаток будет равняться нулю, то данное число будет являться четным, в противном случае оно будет нечетным.

Чтобы определить является число двузначным или нет, будет использовать функцию div(Ndiv10). Если целая часть от деления на число 10 будет являться число в диапазоне от 1 до 9, то это число будет являться двузначным, в противном случае оно будет не двузначным.

Пример: 45 div10 = 4 (1<4<9) – число двузначное, а 450div10 = 45 (45>9) – число не является двузначным.

Входной переменной в задаче будет целое число N.

Выходными данными будут являться следующие утверждения:

  1. число является четным;

  2. число является нечетным;

  3. число является двузначным;

  4. число не является двузначным.

2.2.2 Словесно формульное описание задачи

1. Считать ввод числа с клавиатуры числа в переменную N, перейти к п. 2.

2. Если число Nделится на 2 без остатка то, вывести на экран сообщение “ Число является четным ”, в противном случае вывести на экран сообщение “ Число не является четным ” и перейти к пункту 3.

3. Если при делении числа Nна 10 остаток в диапазоне от 1 до 9 то, вывести на экран сообщение “ Число является двузначным”, в противном случае вывести на экран сообщение “ Число не является двузначным ” и перейти к пункту 4.

4. Конец программы.