Advertisement
Guest User

Untitled

a guest
Apr 4th, 2020
169
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pascal 0.14 KB | None | 0 0
  1. var i : integer;
  2. a : array [1..6] of integer;
  3.  
  4. begin
  5. for i := 1 to 6 do
  6.     readln(a[i]);
  7.  
  8. for i :=1 to 6 do
  9.     writeln(a[i]);
  10. end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement