Make a solution program: given a three-digit number, find the product of these numbers.
| December 10, 2020 | education
Pascal:
Program sd;
uses crt;
var
s, y, z, x, r: integer;
Begin
clrscr;
Writeln (‘Enter a three-digit number:’);
readln (x);
s: = x div 100;
r: = x mod 100 div 10;
y: = x mod 10;
z: = y * r * s;
writeln (‘product of numbers =’, z);
readln;
End.
One of the components of a person's success in our time is receiving modern high-quality education, mastering the knowledge, skills and abilities necessary for life in society. A person today needs to study almost all his life, mastering everything new and new, acquiring the necessary professional qualities.
