ПОМОГИТЕ!Задача по информатике.Вычислить p и s ромба у которого сторона и меньшая диагональ=a
Нужно решить через программу Pascal ABC

Var p, s, a: real;
begin
writeln (Введите число a);
readln(a);
p:=4*a;
s:=a*a*sqrt(3)/4;
writeln(Периметр ромба равен , p:2:2);
writeln(Площадь ромба равна , s:2:2);
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.