Составьте программу возведения в квадрат и в куб ,, .

настя200336 настя200336    2   07.09.2019 08:40    0

Ответы
mn197 mn197  06.10.2020 22:45
PascalABC.NET 3.3, сборка 1547 от 07.10.2017
Внимание! Если программа не работает, обновите версию!

begin
  var x:=ReadReal('Введите число:');
  Writeln('Его квадрат ',x*x,', куб ',x*x*x)
end.

Пример
Введите число: -35.432
Его квадрат 1255.426624, куб -44482.276141568
ПОКАЗАТЬ ОТВЕТЫ
Ahau Ahau  06.10.2020 22:45
Var
x : real;
begin
write('Введите число х: ');
readln(x);
writeln(x, 'в квадрате равно', power(x, 2));
writeln(x, 'в кубе равно', power(x, 3))
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика