daily pastebin goal
9%
SHARE
TWEET

Untitled

a guest Mar 20th, 2019 48 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. var
  2.   a: array [1..10] of integer;
  3.  
  4. begin
  5.   //Чтение элементов
  6.   for var i := 1 to 10 do
  7.     read(a[i]);
  8.    
  9.   // Обработка
  10.   a[1] := 0;
  11.   a[2] := a[2] + 10;
  12.   a[3] := a[1] - 1;
  13.  
  14.   //Вывод элементов
  15.   for var i := 1 to 10 do
  16.     write(a[i], ' ');
  17. 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
 
Top