Программа запросил количество чисел в ноборе. числа в ноаборе могут быть дробными. паскаль должен отобразить только целые части, введённых чисел, а такижк сумму целых чисел
115
377
Ответы на вопрос:
Var n,k: integer; begin write('n k: '); readln(n,k); writeln(n*(1+0.001*k+(0.019*ord(k> 30)*(k-: 0: 2); end.
Популярно: Информатика
-
suxowaalisa20.10.2021 11:44
-
khsush21.04.2023 20:25
-
natalibezugla202.11.2022 15:12
-
Мarshmallow28.09.2021 11:40
-
Саша11111111111уу27.03.2020 21:33
-
ariko01012.06.2020 02:02
-
glebshestopal18.09.2022 02:19
-
КираГум12.02.2022 08:21
-
Violetta1508mailru11.09.2022 19:10
-
Ol3ksa19.07.2022 16:49