Question

СРОЧНО! Пользователь вводит три числа. Увеличьте первое число в два раза, второе числа уменьшите на 3, третье число возведите в квадрат и затем найдите сумму новых трех чисел.программа паскаль, если можно то пожалуйста все расписать по порядку.

Answer 1

var

a,b,c:integer; //заводим 3 переменные

begin

   { Делаем запрос на ввод 3 чисел с клавиатуры,

   и записываем их по порядку в

   перечисленные переменные }

   readln(a,b,c);

   a:=a*2; //Увеличели в два раза

   b:=b-3; //Уменьшили на 3

   c:=c*c; //возвели в квадрат

   

   a:=a+b+c; // Нашли сумму 3 чисел

   writeln (a); // вывод суммы на экран

end.

Answer 2

// PascalABC.NET

begin

 var (a, b, c) := ReadReal3('Введи три числа:');

 (a, b, c) := (2 * a, b - 3, c * c);

 Print(a + b + c)

end.

Answer 3

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

pascalCopy code
program ManipulateNumbers;
var
  num1, num2, num3: integer;
  result: integer;
begin
  writeln('Введите первое число:');
  readln(num1);
  
  writeln('Введите второе число:');
  readln(num2);
  
  writeln('Введите третье число:');
  readln(num3);
  
  // Увеличиваем первое число в два раза
  num1 := num1 * 2;
  
  // Уменьшаем второе число на 3
  num2 := num2 - 3;
  
  // Возводим третье число в квадрат
  num3 := num3 * num3;
  
  // Находим сумму новых трех чисел
  result := num1 + num2 + num3;
  
  writeln('Результат:');
  writeln('Первое число:', num1);
  writeln('Второе число:', num2);
  writeln('Третье число:', num3);
  writeln('Сумма новых чисел:', result);
end.

Вы можете скопировать этот код в вашу среду программирования для языка Pascal и выполнить его. Программа сначала запросит у пользователя ввод трех чисел, затем выполнит указанные операции и выведет на экран новые значения чисел и их сумму.