Задать вопрос
19 ноября, 03:47

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

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

+1
Ответы (1)
  1. 19 ноября, 04:23
    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. ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы