ПОМОГИТЕ С ЗАДАЧАМИ ПО ИНФОРМАТИКЕ В ПАСКАЛЬ!!!СРОЧНО!!!

1)Дан треугольник у которого известны длины всех сторон. Найти переменную.

2)Дан прямоугольный треугольник у которого известны длины катетов. Найти гипотенузу.

Ответы

Ответ дал: westour4
1

Ответ:

2)

var

catet1, catet2, c: real;

begin

write('первый катет = ');

readln(catet1);

write('второй катет = ');

readln(catet2);

c := sqrt(catet1*catet1 + catet2*catet2);

writeln('гипотенуза: ',c:1:2)

end.

Объяснение:

Первая задачка условие не понятно, напиши в коментах что найти нужно, что за переменная


ulab49012: периметр а не переменную это опечатка
westour4: var
a, b, c, p: integer;
begin
write('Длина стороны a = ');
readln(a);
write('Длина стороны b = ');
readln(b);
write('Длина стороны c = ');
readln(c);
p := a + b + c;
writeln('Периметр: ', p);
end.
ulab49012: спасибо
Вас заинтересует