Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  -9
Language: PASCAL
Code:
uses crt;
var
x,y:real;
begin
textcolor(11);
writeln(Введите число x: );
readln(x);
if xlt;=0 then y:=0 else writeln(y:3:0);
end.
          
Comments: