Главная » Статьи » Информатика в школе |
Паскаль. Практическая работа.
Практическая работа Разработка линейных программ в Паскаль.
Задача: Вычислите площадь треугольника по трем сторонам, пользуясь формулой Герона. Program ploshad; Var a,b,c,p,s: real; Begin Writeln (‘введите длины сторон треугольника’); Readln (a,b,c); P:=(a+b+c)/2; S:=sqrt(p*(p-a)*(p-b)*(p-c)); Writeln (‘Площадь треугольника=’, s) End.
Ввести А и В Поменять местами содержимое ячеек А и В Вывести результат Конец. | |
Просмотров: 207 | |
Всего комментариев: 0 | |