Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  kub i kvadrat
Language: PASCAL
Code:
PROGRAM kvadrat i kub;
var n,kvadrat,kub : real;
Begin
writeln('vnesete.... n');
Readln(n);
kvadrat:=n*n;
kub:=kvadrat*n;
writeln(n:7:2,'na kub e',kub:16:2.'.');
end.     
          
          
          
          
Comments: