На pascal. с клавиатуры вводится вещественное число. - вопрос №8280384 от Rushana14 22.07.2022 13:55

Question

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

Rushana14 · 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).