На pascal. с клавиатуры вводится вещественное число. вывести сумму трёх его первых цифр после десятичной точки. решение должно быть без условии (if) и циклов (while).
293
328
Ответы на вопрос:
var a: real;
b: integer;
begin
readln(a);
b: =round(a*1000)mod 1000;
write(b div 100 + b mod 10 + b mod 100 div 10);
end.
11011100.10000000.01110010.10001110 - адрес узла 11111111.11111111.11000000.00000000 - маска 11011100.10000000.01000000.00000000 - адрес сети 11000000 = 192
Популярно: Информатика
-
00BlackMoon0004.02.2020 15:21
-
fana029626.08.2021 07:20
-
sashatims10.01.2021 14:16
-
IvanRusYT17.05.2021 06:41
-
LizaRey06.01.2020 20:48
-
polikarpova0505.10.2021 10:12
-
gopexar21.05.2023 15:29
-
75576609.08.2020 00:44
-
trolololo22835322.04.2020 19:52
-
Fynerka12.12.2021 17:10