Ответы на вопрос:
Program test; var masg, maskg: real; begin write('введите массу (в граммах): '); readln(masg); writeln(); writeln(masg, ' грамм = ', masg, ' грамм'); maskg : = masg / 1000; writeln(masg, ' грамм = ', maskg, ' килограмм'); end.
Популярно: Информатика
-
LEH928.05.2020 22:29
-
сонька2005бедовая04.10.2022 08:45
-
Anechka666525.09.2022 05:26
-
Iliyz29.04.2020 13:38
-
aleksejgrunin022.04.2020 16:59
-
angel353024.06.2020 10:11
-
Gulnazzikon27.03.2021 10:39
-
Бодичка53923.12.2021 18:01
-
d0ruska27.02.2022 08:14
-
клубника2502.09.2021 06:41