я кодир?


Program a;
var
a,b,c :Integer;
Begin
Readln(a);
Readln(b);
c:=a*b;
writeln(c);
end.