Напишите пожалуйста блок-схему и программу к задачам по информатике в TurboPascal

Question

Напишите пожалуйста блок-схему и программу к задачам по информатике в TurboPascal

---

Answer 1

Program gffghgf;
var
CA,AB,BC: real;
begin
CA:=12.144;
AB:=12.144;
BC:=6.67;
writeln(CA+AB+BC);
End.