k075ko8

09.01.2023

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

Информатика

Ответить

Ответы

tany821

09.01.2023

var

catet1, catet2, c: real;

begin

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

readln(catet1);

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

readln(catet2);

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

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

end.

Объяснение:

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

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

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

▲

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

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

Составить блок схему алгоритма и программу для вычисления функции по формуле

Как стать участником телеконференции?

Письменно написать программку для решения : длина прямоугольника равна 91 см. а площадь прямо-угольника равна 455см в квадрате. найдите его площадь.

Напишите программу, которая "разворачивает" число наоборот, например, из числа 123 строит число 321. используйте функцию для выполнения этой операции. pascal

Информатика решить вот такую задачку.

Запусти Паскаль и введи программу:vara, b, c:integer;begina:=−25;b:=abs(a);writeln('abs(−25)=', b);c:=sqr(b);writeln('sqr(b)=', c);c:=sqr(b+b);writeln('sqr(b+b)=', c);end.При запуске программы вывод н...

Написать программу , которая находит сумму цифр двузначного числа, а затем меняет цифры местами

Запишите 32-битный IP-адрес в виде четырёх десятичных чисел, разделённых точками: 11110100101101001101001001001101

Укажите адрес выделеных диапазоных ячеек

Запишите каков будет результат выполнения программы при заданных значениях переменной (z) ! var x, y, z: integer; begin read (x, y); if(abs (x) else if abs(x)> abs(y) then z: =x-y else z: =x*y; w...

Файл - это место на диске, имеющее имя информация, которая хранится в долговременной памяти как единое целое и имеющая имя папки, в которых хранится информации

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

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

Составить блок схему алгоритма и программу для вычисления функции по формуле

Как стать участником телеконференции?

Письменно написать программку для решения : длина прямоугольника равна 91 см. а площадь прямо-угольника равна 455см в квадрате. найдите его площадь.

Напишите программу, которая "разворачивает" число наоборот, например, из числа 123 строит число 321. используйте функцию для выполнения этой операции. pascal

Информатика решить вот такую задачку.

Запусти Паскаль и введи программу:vara, b, c:integer;begina:=−25;b:=abs(a);writeln('abs(−25)=', b);c:=sqr(b);writeln('sqr(b)=', c);c:=sqr(b+b);writeln('sqr(b+b)=', c);end.При запуске программы вывод н...

Написать программу , которая находит сумму цифр двузначного числа, а затем меняет цифры местами

Запишите 32-битный IP-адрес в виде четырёх десятичных чисел, разделённых точками: 11110100101101001101001001001101

Укажите адрес выделеных диапазоных ячеек ​

Запишите каков будет результат выполнения программы при заданных значениях переменной (z) ! var x, y, z: integer; begin read (x, y); if(abs (x) else if abs(x)&gt; abs(y) then z: =x-y else z: =x*y; w...

Файл - это место на диске, имеющее имя информация, которая хранится в долговременной памяти как единое целое и имеющая имя папки, в которых хранится информации

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

Укажите адрес выделеных диапазоных ячеек

Запишите каков будет результат выполнения программы при заданных значениях переменной (z) ! var x, y, z: integer; begin read (x, y); if(abs (x) else if abs(x)> abs(y) then z: =x-y else z: =x*y; w...