1.Площадь S квадрата вводится с клавиатуры. Вычислить длину стороны a и длину диагонали d.
2. В прямоугольном треугольнике заданы два катета a и b, значения которых вводятся с клавиатуры. Найти гипотенузу c и площадь S.
Язык: Pascal
ДАШУНЯ1311
1
25.02.2020 22:12
1
Другие вопросы по теме Информатика
nastyak12119
25.01.2021 09:50
Nuruk04
25.01.2021 09:49
nikitaknss
18.07.2019 02:00
mariyamariya201
18.07.2019 02:00
DAYDEMON
15.11.2020 19:20
jassibrony
15.11.2020 19:20
snejanaterg
15.11.2020 19:20
yanchikkatsia
15.11.2020 19:20
DmitriiSh197
15.11.2020 19:20
Популярные вопросы
- Объясните причины последствия 50-60годах...
2 - тіло рухається прямолінійно під дією сили, відомо що в першу секунду після початку...
1 - Для отделки фартука используют различные отделочные материалы: а) ленту б) тесьму...
1 - Найти область визначення функції...
1 - Какую роль играет реальность и фантазия в творчестве разных художников...
2 - Опишите следующие понятия: петроглифы, культ предков, культ огня, неолитическая...
2 - Read the text and mark the sentences T(true) or F(False) !...
2 - На предприятии в отчетном году освободилось 13 человек - по собственному желанию,...
1 - Choose three phrases with the word ‘go’. 1) … a party 2) … a concert 3) … dancing...
1 - Вариант 4 1. Запишите развернутую форму чисел 54,2014; 504,1245; 7401,28 2. Вычислите...
2
1)
var a,s:integer;
begin
readln(s);
writeln(‘Длина стороны = «‘ sqrt(s));
writeln(‘Длина диагонали = ‘, sqrt(s)*sqrt(2));
end.
2)
begin
readln(a,b);
writeln(‘Гипотенуза = ‘, sqrt((a*a)+(b*b)));
writeln(‘Площадь = ‘, (a*b)/2);
end.