Ответы на вопрос:
Var p, q: real; begin writeln('введите исходные данные: '); write('цена одного килограмма яблок (руб.) -> '); readln(p); write('вес яблок (кг) -> '); readln(q); writeln('стоимость покупки: ', (p * q): 6: 2, ' руб.'); end.
Популярно: Информатика
-
maiorov2711.12.2021 04:02
-
saidos100014.07.2021 15:13
-
ivanbaclan06.07.2022 06:06
-
bossmakswell20.03.2022 02:06
-
Irishka09110.01.2020 21:01
-
ibra1622.10.2020 19:55
-
catBoss00903.10.2020 21:58
-
yarrik00yaroslavchik18.09.2021 09:50
-
Alise1sav21.11.2022 16:11
-
Nodukam09.06.2023 17:43