Public feed #2087822

Someone

public text v1 · immutable
Raw Edit
·published 2011-10-07 22:17 UTC
rendered paste body
program Vaida;
var
  r,S   : real;
begin
  Writeln("Iveskite pirmojo apskritimo spinduli.");
  Readln(r);  
  S:= 21 * r * 3.1416; // 21 = 1^2 + 2^2 + 4^2
  Writeln("Triju apskritimu plotas: ", S:2:2);
  Readln();
end.