Написать программу в pascal 1)найти значение выражения y=1/x 2) вычислить значение выражения y= корень из x делённое на x+1
185
246
Ответы на вопрос:
1) var y,x: real; begin; readln(x); if x=0 then exit; y: =1/x; writeln(y); end. 2)var y,x: real; begin; readln(x); if x< 0 then exit; y: =sqrt(x)/(x+1); writeln(y); end.
12*40*32=15360 символов
15360*16=245600 бит (информационный объем рассказа)
145600 бит = 30 720 байт = 30 кбайт
ответ: 30 килобайт.
Популярно: Информатика
-
Пан200714.03.2022 03:45
-
MariaUt27.02.2023 07:31
-
Поли32203.06.2022 15:35
-
lavrovaa017.03.2022 13:18
-
apakovaleria24.06.2020 07:25
-
aidakairatova0218.02.2021 20:00
-
Бусіта03.08.2020 14:44
-
Коteykа08.01.2022 13:26
-
Zero23424.09.2022 14:08
-
jdkdjdjjidjdjd15.11.2020 10:59