Дана масса в граммах. Переведите её в килограммы и граммы с программ PascalABC.Тема Реализация алгоритмов работы с целочисленными данными.
3Pomidorka3
2
31.01.2022 17:21
1
Другие вопросы по теме Информатика
NyushaLove
17.08.2019 04:20
2Alinochka2
17.08.2019 04:20
yakubchik2004
17.08.2019 04:20
snqa
29.06.2019 07:50
MishaSim2003011
29.06.2019 07:50
seslermarina200
06.05.2021 06:11
Ekaeterina44
03.06.2021 13:35
senyazer
03.06.2021 13:14
Популярные вопросы
- Верны ли определения? А) Выявление в жизнедеятельности семьи...
2 - Экспертная оценка в рамках бихевиористского подхода требует использования...
2 - Воспитание в православной традиции - воспитание в духе приоритета...
2 - Формы семейного поведения, которые в силу своей формы и содержания...
2 - Восстановите соответствие между понятиями и определениями непосредственность...
1 - Восстановите соответствие между понятиями и определениями доминирующая...
1 - Воспитание в культе болезни – это ситуация, при которой болезнь...
1 - Восстановите соответствие между понятиями и определениями санкция...
3 - Семьи, для которых характерно проявление особо трудных ситуаций...
3 - Верны ли определения? А быть естественным в отношениях с людьми,...
1
Program Test;
Var MasG, MasKg: real;
Begin
Write('Введите массу (в граммах): ');
Readln(MasG);
Writeln();
Writeln(MasG, ' грамм = ', MasG, ' грамм');
MasKg := MasG / 1000;
Writeln(MasG, ' грамм = ', MasKg, ' килограмм');