Мне надо решить задачу по информатике в программе Pascal или на листочке.Помогите пожалуйста решитьЗадача№1(Линейный алгоритм)Составить и выполнить программу, задав входные данные самостоятельноВычислить сторону,площадь (S=d2/2...
Мне надо решить задачу по информатике в программе Pascal или на листочке.
Помогите пожалуйста решить
Задача№1(Линейный алгоритм)
Составить и выполнить программу, задав входные данные самостоятельно
Вычислить сторону,площадь (S=d2/2) и периметр квадрата, если если известна его диагональ d.
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы