Question

Написать программу для нахождения удвоенной суммы 2-х чисел.Побыстрее пожалуйста в Паскале

Answer 1

program raf105;

var a,b,sum2: integer;

begin

write('Введите 2 числа: ');

readln(a,b);

sum2:= (a+b)*2;

writeln('Удвоенная сумма введённых чисел: ',sum2);

end.

Язык PascalABC

Answer 2

Конечно! Вот простая программа на языке Pascal для нахождения удвоенной суммы двух чисел:

pascalCopy code
program DoubleSum;

var
  num1, num2, sum: Integer;

begin
  WriteLn('Введите первое число: ');
  ReadLn(num1);

  WriteLn('Введите второе число: ');
  ReadLn(num2);

  sum := num1 + num2;
  sum := sum * 2;

  WriteLn('Удвоенная сумма двух чисел равна: ', sum);
end.

Скопируйте код выше и вставьте его в среду программирования Pascal (например, Free Pascal или Turbo Pascal), чтобы выполнить программу. Она запросит у пользователя ввод двух чисел и выведет удвоенную сумму на экран.