Категория - Информатика Автор - 02082003zae 7 лет назад Дано целое четырёхзначное число. Используя операции mod и div найдите сумму 1 и 2 цифры и произведение 3 и 4
Категория - Информатика Автор - 02082003zae 7 лет назад Дано целое четырёхзначное число. Используя операции mod и div найдите сумму 1 и 2 цифры и произведение 3 и 4
Ответ Автор - unnameduser05 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.