Question

СРОЧНО НУЖНО РЕШЕНИЕ!! ДАЮ 100 БАЛЛОВ

Answer 1

Task 4:

var

x: Integer;

begin

writeln('Enter a number:');

readln(x);

writeln('The square of the number is: ', sqr(x));

end.

Task 5:

var

x: Real;

begin

writeln('Enter a number:');

readln(x);

writeln('The square root of the number is: ', sqrt(x));

end.