Дано целое четырёхзначное число. Используя операции mod и div найдите сумму

Дано целое четырёхзначное число. Используя операции mod и div найдите сумму 1 и 2 числа и произведение 3 и 4

Задать свой вопрос
1 ответ
  • program paskal;
  • var x,y,z:integer;
  • begin
  • writeln('Введите четырёхзначное число:');
  • readln(x);
  • y:=(x div 1000)+(x div 100) mod 10;
  • z:=(x div 10) mod 10*(x mod 10);
  • writeln('Сумма 1-й и 2-й числа: ',y);
  • writeln('Творение 3-й и 4-й цифры: ',z);
  • end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт