2 задача сообщение записанно буквами из 32 символов алфавита,содержит 28 символов какой объём информации в битах он несёт
151
228
Ответы на вопрос:
Program zadacha; uses crt; var a, b, c: integer; u, p, s: real; begin clrscr; write ('vvedite kolichestvo udobrenii, nuzhnyh dlya 1 m^2: '); readln (u); write ('vvedite storony uchastka: '); // таким образом можно ввести любые // стороны, не только 3, 4 и 5 readln (a, b, c); // можно сразу написать a: =4; b: =3; c: =5; p: =a+b+c; writeln (' dlina ogrady - ', p: 0: 2); p: =p/2; s: =sqrt(p*(p-a)*(p-b)*(p-c)); // вычисление площади по формуле герона u: =u*s; writeln ('kolichestvo trebuemyh udobrenii - ', u: 0: 2); readkey; end.
Популярно: Информатика
-
бездoмныйБoг12.04.2021 07:21
-
России554415.11.2022 22:40
-
Зюна02.06.2020 17:52
-
svetakurilova110.08.2020 08:35
-
KatinaDobet200611.02.2023 11:13
-
marat090124.05.2021 15:01
-
kamillikoryan02.11.2022 22:30
-
егорбаглаев1125.06.2020 04:37
-
sva197809.07.2021 22:35
-
ngazaryan10.01.2021 14:45