Program Begin2;
Var
a: Real;
Begin
ReadLn(a);
WriteLn('P = ', Sqr(a):6:3);
ReadLn;
End.
Похожие записи/страницы:
- Дана сторона квадрата a. Найти его площадь S = a2 - Pascal(Паскаль)
- Написать программу, определяющую наименьшую площадь из трех заданных координатами своих вершин квадратов.…
- Задана запись, имеющая три поля: первое – первая сторона треугольника, второе –вторая сторона треугольника,…
- Дана сторона квадрата a. Найти его периметр P = 4·a - Pascal(Паскаль)
- Дана сторона квадрата a. Найти его периметр P = 4·a - Pascal(Паскаль)
- Известны площадь круга S и площадь квадрата S. Определить: поместится ли квадрат в круг - Pascal(Паскаль)
- Дана сторона равностороннего треугольника. Найти площадь этого треугольника и радиусы вписанной и описанной…
- Дана сторона равностороннего треугольника. найти площадь этого треугольника, его Высоту, радиусы вписанной и…