Question

Scrieți un program care conține o funcție ce calculează lungimea unui cerc (L=2πr). Pascal

Answer 1

Răspuns:

program brainly;

Function lungime(l:integer):real;

begin

lungime:=2*3.14*l;

end;

var f:integer;

r:real;

begin

write('dati raza cercului f = ');readln(f);

r:=lungime(f);

writeln('lungimea cercului este = ',r)

end.

Explicație:

functia face calcului simplu 2* pi * r