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

#include<iostream>
using namespace std;
int main(){
	double d, pi = 3.14, l;
	cout << "Vvedite diametr okrujnosti: ";
	cin >> d;
	l = pi*d;
	cout << "Dlina okrujnosti: " << l;
	return 0;
}

import math
import random

d = random.randrange(1,10)
print("Диаметр окружности d = ", d)
print("Пи = ", math.pi)
L = math.pi * d
print("Длина окружности L = ", L)
									

program Begin4;
var
 d,L: Real;
begin
 Write('Введите диаметр окружности : ');
 Readln(d);
 L:=3.14*d;
 Writeln('Длина окружности равна: ', L);
end.
									

d = int(input())
print(d * 3.14)