дана масса автомобиля в килограмах 5145кг. Обусловьте СКОЛЬКО ТОН И СКОЛЬКО

Дана масса автомобиля в килограмах 5145кг. Обусловьте СКОЛЬКО ТОН И СКОЛЬКО КИЛОГРАМОВ весит автомобиль в pascal abc

Задать свой вопрос
1 ответ
Вводи в PascaABC:

program massCounter; //Умышленно для lolpas1234
var kg,t :integer;
Begin
  kg:=5145 mod 1000;
  t:=5145 div 1000;
  WriteLn('Автомобиль весит ', t, ' тонн и ', kg, ' килограмм');
End. //Умышленно для lolpas1234
Людмила Лясенко
Ой
Доп Милана
Enter слетел
Татьяна Лейкина
Не могу изменить
Лариса
Сейчас все верно
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт