Блок – схема алгоритма программы




Задача 1

Треугольник задан длинами сторон. Найти углы треугольника:

; ;

Работа программы

Вводятся исходные стороны треугольника N,K,L с клавиатуры, после чего выводятся на экран углы треугольника A,B,C.

 

Назначение переменных

Назначение переменных, используемых в задаче, приведено в таблице 1

Таблица 1 – Назначение переменных

Переменная Тип Назначение
N,K,L real Вещественные числа,стороны треугольника,вводимые с клавиатура
P real Полупериметр треугольника
A,B,C real Углы получившегося треугольника

 

Блок – схема алгоритма программы

начало
Ввод исходныхсторон треугольника N,K,L
Расчет углов треугольника по заданным сторонам    
Вывод сторон треугольникаA,B,C
Конец

Рис. 1 Блок схема алгоритма программы

Текстпрограммы

 

program treygolnik;

uses crt;

var n,k,l,p,A,B,C: real;

begin

write('Vvedite storony treugolnika a ');

read(n);

write('Vvedite storony treugolnika b ');

read(k);

write('Vvedite storony treugolnika c ');

read(l);

p:=(n+k+l)/2;

A:=(2*arctan(sqrt(p-k)*(p-l)/p*(p-n))*180/pi);

B:=(2*arctan(sqrt(p-n)*(p-l)/p*(p-k))*180/pi);

C:=(2*arctan(sqrt(p-n)*(p-k)/p*(p-l))*180/pi);

writeln('Ygol a raven ',a:5:4);

writeln('Ygol b raven ',b:5:4);

writeln('Ygol c raven ',c:5:4);

end.

Тестирование

Вводим 3 числа(стороны треугольника): (1) находим полупериметр треугольника, (2) вычисляем углы треугольника(А,В,С), (3) выводим результат.

1:

Введите сторону треугольника а=5

Введите сторону треугольника в=4

Введите сторону треугольника а=6

Находим полупериметр р

Вывод данных

Угол А=95.8

Угол В=86.1

Угол С=86.1

Задача 2

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

Работа программы

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

Назначение переменных

Назначение переменных, используемых в задаче, приведено в таблице 1

 

Таблица 1 – Назначение переменных

 

Переменная Тип Назначение переменной
a, с Real Вещественные числа, стоимость карандаша и тетради, вводятся с клавиатуры
b, d Real Вещественные числа, количество карандашей и тетрадей, вводятся с клавиатуры
r, t Real Вещественные числа, стоимость всех карандашей и тетрадей
y Real Вещественные числа, общая стоимость покупки

 

Блок – схема алгоритма программы

начало
Ввод цены,количества карандашей и тетрадей
Находим стоимость карандашей и тетрадей,потом находим общую стоимость
Вывод Стоимости покупки (Sum, M, P)
Конец

 


Текстпрограммы

program stoimost;

uses crt;

var a,b,c,d,e,r,t,y: real;

begin

write('Vvedite cenu tetradi ');

read(a);

write('Vvedite kollichestvo tetradei ');

read(b);

write('Vvedite cenu karandasha ');

read(c);

write('Vvedite kollichestvo karandashei ');

read(e);

r:=a*b;

t:=c*e;

d:=r+t;

writeln('Stoimost vashei pokypki sostavila ', d:5:2);

end.

Тестирование

Вводим количество, стоимость карандашей и тетрадей: (1) находим стоимость тетрадей и карандашей (2)находим общую стоимость карандашей и тетрадей (3) вывод данных

1:

Введите стоимость тетради a=5

Введите количество тетрадей в=2

Введите стоимость карандаша с=4

Введите количество карандашей d=1

Стоимость тетрадей r=10

Стоимость карандашей t=4

Стоимость покупки y=14

Задача 3

Написать программу вычисления объема цилиндра.

Работа программы

Вводится высота, радиус цилиндра после чего вычисляется его объем данного.

Назначение переменных

Назначение переменных, используемых в задаче, приведено в таблице 1

Таблица 1 – Назначение переменных

 

 

Переменная Тип Назначение переменной
r,h Real Радиус и высота цилиндра вещественные числа вводимые с клавиатуры
V Real Вещественное число объем цилиндра

 

Блок – схема алгоритма программы

 

 

начало
Ввод радиуса и высоты цилиндра
Находим объем цилиндра V
Вывод Объема цилиндра (Sum, M, P)
Конец

 


Текстпрограммы

program ob;

var r,h,v: real;

begin

write('Vvedite vusoty cilindra ');

read(h);

write('Vvedite radius cilindra ');

read(r);

v:=pi*r*r*h;

writeln('Obem cilindra raven ',v:5:4);

end.

Тестирование

Вводим высоту(h) и радиус(r) цилиндра после чего программа находит его объем(v).

1:

Введите радиус цилиндра r=5

Введите высоту цилиндра h=10

Объем цилиндра v=785.3982

Задача 4

Написать программу вычисления стоимости поездки на автомобиле на дачу (туда и обратно). Исходными данными являются: расстояние до дачи (в километрах); количество бензина, которое потребляет автомобиль на 100 км пробега; цена одного литра бензина.

Работа программы

Вводится цена бензина, расстояние до дачи, расход бензина на 100 км. После чего программа рассчитывает стоимость затрат на бензин.

Назначение переменных

Назначение переменных, используемых в задаче, приведено в таблице 1

Таблица 1 – Назначение переменных

Переменная Тип Назначение переменной
a,b,c Real Расстояние до дачи, расход бензина на 100 км,цена бензина за 1 литр. Вещественные числа вводятся с клавиатуры
q,w,e Real Расстояние до дачи \100, расчет количества бензина затраченного на поездку, стоимость бензина на поездку. Вещественные числа
r Real Ваши затраты на бензин. Вещественное число.


Поделиться:




Поиск по сайту

©2015-2024 poisk-ru.ru
Все права принадлежать их авторам. Данный сайт не претендует на авторства, а предоставляет бесплатное использование.
Дата создания страницы: 2018-01-08 Нарушение авторских прав и Нарушение персональных данных


Поиск по сайту: