Решения задач на тему ввода и вывода данных в Pascal

Решение задачи №4

program four;

var
   d:real;
begin
     write('d=');
     read(d);
     write('L=', 3.14*d);
end.

Назад