В 1834 году было изобретено челночное устройство швейной машины. Изобрел его Уолтер Хант.
55 гигабайт 5 гб это 5000 мг в квадрате
Var
A,p:integer;
begin
Write('Введиnе число:');
Readln(A);
p:= A mod 10;
while A > 9 do
A:=A div 10;
p:=p*A;
WriteLn(p);
Readln;
<span>end.</span>