Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Task1-3
//fpc 3.0.0 program task1_3; var a, b, c: real; s, area: real; begin write('Enter the length of a: '); readln(a); write('Enter the length of b:'); readln(b); write('Enter the length of c:'); readln(c); s := (a+b+c)/2; area := sqrt(s*(s-a)*(s-b)*(s-c)); writeln('Area of the triangle:', area:10:2); end.
run
|
edit
|
history
|
help
0
practica 1 ejercicio 6
Количество пар кр и некр 11 улучшенный алгоритм
zadanye 3 г
сумма чётных и нечётных чисел
две рядом стоящие одинаковые цифры у числа
hi
Андреева Урок 6 задача 8 (1531)
mod/div
Squad equation
6