Ответы на вопрос:
Procedure rectdiag(a,b: real; var d: real); begin d: =sqrt(a*a+b*b); end; var a,b,d: real; begin read(a,b); rectdiag(a,b,d); writeln(d); end.
Популярно: Информатика
-
nmedvedeva2001806.04.2020 10:13
-
siraevadiana21.08.2022 15:10
-
ivanovgrisha2df12.12.2021 00:57
-
KapitanNEMO19.03.2020 21:37
-
MIO0525.01.2023 23:25
-
AmitJK11.08.2020 19:08
-
maksik00828.12.2020 20:48
-
muskuss12Ирада12.01.2021 08:44
-
ffffffffffffff5231.10.2022 11:06
-
P4k3T18.03.2022 14:57