Помогите решить задачи, 8 класс(Pascal ABC)
Задача №3. Дан диаметр окружности d. Найти ее длину L = 3.14*d.
Задача №4. Дана длина ребра куба a. Найти объем куба V = a 3 и площадь его поверхности S = 6a 2 . Задача
№5. Дано расстояние в сантиметрах. Найти число полных метров и километров данного расстояния

//Pascal ABC.NET v3.1 сборка 1172//3Var d:real;begin readln(d); writeln(3.14*d);end.//4Var a:real;begin readln(a); writeln('V=',a*a*a); writeln('S=',6*sqr(a));end.//5Var a:real;begin readln(a); writeln(a/100,' м'); writeln(a/100000,' км');end.