Мне надо решить задачку по информатике в программе Pascal либо на листочке.Помогите

Мне надо решить задачку по информатике в программке Pascal либо на листочке.
Помогите пожалуйста решить

Задачка1(Линейный метод)
Составить и выполнить программу, задав входные данные без помощи других

Вычислить сторону,площадь (S=d2/2) и периметр квадрата, если если знаменита его диагональ d.

Задать свой вопрос
1 ответ
Program Project1;
var  a, P, S, d :real;
begin
  readln(d);  a:= d/sqrt(2);  S:= sqr(a);  P:= 4*a;  writeln('Сторона: ',a);  writeln('Площадь: ',S);  writeln('Периметр: ',P); 
end.
Моркунцев Никита
Спасибо большое
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт