Даны целые числа a и b. найти их удвоенную сумму. дано: a и b-целые числа(integer) найти: u-удвоенную сумму(сумма целых чисел s- целое число, удвоенное целое – целое число integer)

Var a,b,s,u:integer;
begin
write('a = '); readln(a);
write('b = '); readln(b);
s:=a+b;
u:=2*s;
writeln('u = ',u);
end.

Пример:
a = 5
b = 8
u = 26