Срочно!!!Написать программу ** языке Pascal и нарисовать блок-схему программы. Дано:...

0 голосов
55 просмотров

Срочно!!!Написать программу на языке Pascal и нарисовать блок-схему программы.
Дано: прямоугольный треугольник;
Найти: площадь и периметр.


Информатика (20 баллов) | 55 просмотров
0

Ребят срочно!Любые числа!

Дан 1 ответ
0 голосов

Var a,b,c:integer;
begin
writeln('Введите катеты прямоугольного треугольника и гипотенузу соответственно');
readln(a,b,c);
writeln('Площадь этого треугольника равна  ',0.5*a*b);
writeln('Перимитер этого треугольника равен  ',a+b+c);
end.

(18 баллов)
10,984,878 вопросов
13,471,016 ответов
8,518,553 комментариев
4,909,216 пользователей