program CalculateSquareRootDifference; var num1, num2, squareNum1, sqrtNum2, difference: real; begin writeln('Введите первое число:'); readln(num1); writeln('Введите второе число:'); readln(num2); squareNum1 := sqr(num1); sqrtNum2 := sqrt(num2); difference := squareNum1 - sqrtNum2; writeln('Квадрат первого числа: ', squareNum1:0:2); writeln('Корень второго числа: ', sqrtNum2:0:2); writeln('Разность квадрата и корня из чисел: ', difference:0:2); end.
Пользователь должен ввести два числа с клавиатуры, после чего программа вычислит квадрат первого числа, корень второго числа и разность между квадратом первого числа и корнем второго числа.
Пример программы на Pascal:
program CalculateSquareRootDifference;var
num1, num2, squareNum1, sqrtNum2, difference: real;
begin
writeln('Введите первое число:');
readln(num1);
writeln('Введите второе число:');
readln(num2);
squareNum1 := sqr(num1);
sqrtNum2 := sqrt(num2);
difference := squareNum1 - sqrtNum2;
writeln('Квадрат первого числа: ', squareNum1:0:2);
writeln('Корень второго числа: ', sqrtNum2:0:2);
writeln('Разность квадрата и корня из чисел: ', difference:0:2);
end.
Пользователь должен ввести два числа с клавиатуры, после чего программа вычислит квадрат первого числа, корень второго числа и разность между квадратом первого числа и корнем второго числа.