с клавиатуры вводится 2 числа длинны катетов прямоугольного треугольника, вычислить перемитр и площадь треугольника?
5-9 класс
|
Var katOne, katTwo : integer;
Begin
Write('Введите катеты');
Readln(katOne, katTwo);
if (katOne > 0) and (katTwo > 0) then
writeln('Площадь = ', katOne*katTwo/2, 'Периметр = ', katOne + katTwo + sqrt(katOne*katOne + katTwo*katTwo)
else writeln('Error')
Readln()
End.
Другие вопросы из категории
Читайте также
2.С клавиатуры вводится действительное число p.Записать отдельно его целую часть C.
Помогите составить программу.
Программа Паскаль
с клавиатуры вводится число х. если остаток от деления х на 6 равен 2, то значение f(x)=4*x^2 если остаток от деления х на 6 равен 3, то значение f(x) = корень из х , если остаток от деления на 6 =0 то f(x) = x.
Написать программу в паскале используя операторы if и else . Нарисовать блок схему
треугольника). Найдите треугольник с наибольшей площадью. Выведите его номер, длины катетов и площадь. Предусмотрите случай, когда таких треугольников несколько.
натуральных двузначных чисел. Определить
среднее арифметическое нечетных чисел;
№3 С клавиатуры вводятся 10 натуральных двузначных чисел. Определить
верно ли, что среди введенных чисел есть число, в котором первая цифра в два раза больше последней.