Реферат: Типи даних алгоритмічної мови TURBO Pascal Стандартні функції і оператори роботи з рядками

Var M : array [ 1..10 ] of integer;

i : integer;

begin

i := 0;

repeat

i := i+1;

read ( M [ i ] )

until i = 10

end.

2) обчислити значення функції Y_i =(a+b+x_i )/2, якщо а і b – фіксовані значення; x={3,8,12,20,25}, i=1,N .

var

A,B : real;

i, N : integer;

X, Y : array [1..5] of real;

begin

read (A, B, N);

for i := 1 to N do

begin

read ( X [i] );

Y [i] := (A + B + X[i])/2;

Write ( Y [i] );

end;

end.

Завдання 1: (масиви)

Введення одномірного масиву і виведення у вигляді:

а) вектора-рядка;

б) вектора-стовпчика.

a) Var M : array [1..10] of real;

i : integer;