Главная » Информатика

использование линейных алгоритмов для решения задач

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

Решение 
Program ploshad ravnostoronnego treygolnika; Var a,s:real; begin writln(‘Vvedite storony’); Readln(a); s:=(sgr(a)*sgrt(3))/4; writln (`Ploshad S=. s); end.

Выполнение 
Alt+F9 – компиляция, проверка на ошибки.  Ctrl+F9 – выполнение программы. Вводим переменные, например a=5. Получаем на экране сообщение площадь треугольника равна 11

Объяснение 
program perimetr; (указываем название программы) 
var P,a.b.c:integer; (описываем переменные в программе) 
begin (начало рабочей области) 
writeln(‘введите длины сторон’ ); (оператор вывода предупреждает пользователя, что надо ввести значения переменных) 
readln(a); (считывание значений переменных в память компьютера) 
s:=(sgr(a)*sgrt(3))/4;(присваиваем переменной s сумму трех сторон) 
writeln(‘площадь треугольника равена’ ,s); (выводим результат на экран) 
end. (конец рабочей области)


20.10.2013 / Сергей / 634 / 0
Подробнее →

Составление программы на языке Paskal по нахождению площади треугольника по формуле Герона.

1. Использование линейных алгоритмов для решения задач. 
2.Задача: составить программу на языке Paskal по нахождению площади треугольника по формуле Герона.
3.Решение:

Programa vichislenie_ploshadi_treug_po_Geronu;

Var a,b,c,S,p:real;

begin

writenLn(‘dliny storon’);

readLn(a);

readLn(b);

readLn(c);

p:=(a+b+c)/2;

S:=sqrt(p*(p-a)*(p-b)*(p-c));

writenLn(‘ploshad=’,S);

end.

4. Выполнение.

Alt+F9 – компиляция, проверка на ошибки.

Ctrl+F9-выполнение программы.

Вводим переменные(длины сторон треугольника).

Alt+F5 – просмотре результатов.

Получаем на экране ответ.

5. Объяснение:

Programa vichislenie_ploshadi_treug_po_Geronu;(название программы)

Var a,b,c,S,p:real;(переменные в программе)

begin(начало рабочей области)

writenLn(‘dliny storon’);(оператор ввода оповещает о необходимости ввести переменные)

readLn(a);

readLn(b);

readLn(c);(считывается значение переменных в память компьютера)

p:=(a+b+c)/2;(рассчитывается полупериметр)

S:=sqrt(p*(p-a)*(p-b)*(p-c));(рассчитывается площадь треугольника)

writenLn(‘ploshad=’,S);(вывод результата на экран)

end.(конец рабочей области)


20.10.2013 / Лёша / 7125 / 0
Подробнее →
« 1 2 3 4 5 6 7 ... 17 18 »