Ответы и объяснения

2013-10-09T23:51:46+04:00
Если на паскале, то
var a, b : longint;
begin
readln (a);
b:=4*a;
writeln (b);
end.