На pascal. с клавиатуры вводится вещественное число. - вопрос №8279482 от Deniz1337 23.02.2021 09:30

Question

Информатика: На pascal. с клавиатуры вводится вещественное число. вывести сумму трёх его первых цифр после десятичной точки. решение должно быть без условии (if) и циклов (while).​

Deniz1337 · Answer

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....

На pascal. с клавиатуры вводится вещественное число. вывести сумму трёх его первых цифр после десятичной точки. решение должно быть без условии (if) и циклов (while).​

На pascal. с клавиатуры вводится вещественное число. вывести сумму трёх его первых цифр после десятичной точки. решение должно быть без условии (if) и циклов (while).