Предмет: Информатика, автор: Кристиночка2003

Пожалуйста, помогите написать на языке Паскаль

Приложения:

Ответы

Автор ответа: ValeraPOVAL
1

Ответ:

program zadacha;

var

a,b,d,s,p:real;

begin

Writeln('Введите стороны а и b');

Readln(a,b);

d:=sqrt(sqr(a)+sqr(b));

s:=a*d;

p:=2*(a+b);

Writeln('Периметр прямоугольника P = ',p:5:2);

Writeln('Площадь прямоугольника S = ',s:5:2);

readln;

end.

Фото это результат программы(консоль) з любыми подставлеными значениями.

Приложения:
Похожие вопросы
Предмет: Литература, автор: suxari285
Составьте план текста пж.


Тихо в лесу. Лиловые длинные тени лежат на сугробах. По нежно-голубому
весеннему небу плывут легкие белоснежные облака.
Если прислушаться, можно услышать, как тихо дышит, пробуждается зимний
лес. Он живет в эти дни невидной и неслышной жизнью, которая доступна только
зоркому глазу и чуткому уху. Вот по-весеннему попискивают, возятся шустрые
черноголовые синички. На макушке сухого звонкого дерева пустил весеннюю
торжественную трель лесной барабанщик дятел. Стайка клестов широким красно-
брусничным ожерельем рассыпалась по вершинам елей.
Празднично в весеннем лесу! На сугробах уже появились стеклянные кружева.
Высятся на солнце медно-бронзовые стволы сосен, возносятся в самое небо раскидистые
вершины. Жесткие вечнозеленые ветки багульника показались у пригретого мартовским
солнцем высокого пня.
Скоро наступит настоящая, бурная весна.
Предмет: Литература, автор: Аноним