диагонали квадрата в паскале

Ответ

Автор - therealcf2014

var a, d: real;
begin
write('Сторона квадрата: ');
read(a);
d:= sqrt(2*sqr(a));
writeln('Диагональ равна: ', d);
end.

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.