ПОМОГИТЕ С ЗАДАЧАМИ ПО ИНФОРМАТИКЕ В ПАСКАЛЬ!!!СРОЧНО!!!
1)Дан треугольник у которого известны длины всех сторон. Найти переменную.
2)Дан прямоугольный треугольник у которого известны длины катетов. Найти гипотенузу.
Ответы
Ответ дал:
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:
периметр а не переменную это опечатка
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.
Вас заинтересует
1 год назад
1 год назад
7 лет назад
8 лет назад