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

Question

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

Answer 1

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