2 и 3 плиииз
Срочно
Помогите

2.
var a,b,s:integer;
begin
readln(a,b);
s:=a*b;
writeln(s);
end.

3.
var b,c,sum:integer;
begin
readln(b,c);
sum:=(b+c)*10;
writeln(sum);
end.