Задать вопрос
9 марта, 03:51

Написать программу в паскале

Найти периметр и площадь прямоугольного треугольника, если даны длины его катетов a и b.

+2
Ответы (1)
  1. 9 марта, 07:26
    0
    Var a, b:integer;

    c:real;

    begin

    Write ('a=') ; readln (a) ;

    Write ('b=') ; readln (b) ;

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

    Writeln ('P = ', a+b+c) ;

    Writeln ('S = ', (a*b) / 2) ;

    end.

    Пример:

    a=5

    b=12

    P = 30

    S = 30
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Написать программу в паскале Найти периметр и площадь прямоугольного треугольника, если даны длины его катетов a и b. ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы