Программа запросил количество чисел в ноборе. Числа в ноаборе могут быть дробными. Паскаль должен отобразить только целые части, введённых чисел, а такижк сумму целых чисел

Question

Амата

29 июля, 17:05

+3

Ответы (1)

Знаете ответ?

Текуса · Answer 1

Var n, k:integer; begin write ('N k: ') ; readln (n, k) ; writeln (n * (1+0.001*k + (0.019*ord (k>30) * (k-30))) : 0:2) ; end.