Какой оператор используется в паскале для открытия файла для чтения?

105

212

Посмотреть ответы 1

Ответы на вопрос:

vlinkova4

Информатика

4,8(83 оценок)

1)var a: array[1..100] of integer; i,n: integer; begin readln(n); for i: =1 to n do a[i]: =random(10000); for i: =1 to n do if i mod 2 < > 0 then write(a[i]*a[i],' '); end. 2)var a: array[1..100] of integer; i,k,n: integer; begin readln(n); for i: =1 to n do a[i]: =random(10000); for i: =1 to n do if a[i] mod 2 < > 0 then k: =k+1; write(k); end.