Question

дано действительное число х.Вычислите его квадрат.

заранее спасибо)надеюсь на быструю помощь

Answer 1

uses crt;varx:integer;s:real;beginclrscr;write('x=');read(x);s:=x*x;writeln('resultat=',s);end.

Answer 2

огромное вам спасибо