a guest Feb 21st, 2020 77 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. program olimp_1;
  2. var
  3. a,b,i:integer;
  4. begin
  5. readln(a,b);
  6. for i:=a to b do
  7. begin
  8. writeln(i,' ',i*i,' ',i*i*i);
  9. end;
  10. readln;
  11. end.
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand