pastebin

Paste Search Dynamic
Recent pastes
lista uproszczona
  1. program lista_uproszczona;
  2. type tab=array[1..10]of integer;
  3.      lst = record
  4.                 elementy: tab;
  5.                 ile: integer
  6.              end;
  7. var
  8.     i: integer;
  9.     x: lst;
  10.  
  11. begin
  12.     read(x.ile);
  13.     for i:= 1 to x.ile do readln(x.elementy[i]);
  14.     for i:= 1 to x.ile do writeln(x.elementy[i])
  15. end.
Parsed in 0.006 seconds