Algofil
Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
чтоб кодить надо смареть в справочник алфавит-идентификаторы-константы-выражения-операции-процедуры-функции... опять же посоветую Фаронова
Пример процедуры с параметрами (передаются значения):
procedure read_array(row, col:byte);
var i,j:byte;
begin
for i:=1 to row do
for j:=1 to col do
begin
write ('get array[',i,',',j,'] -> ');
readln(matrix[i,j]);
end;// end_for_j
end;// end_proc
BEGIN
read_array(3,3);
END.
массив matrix ессно глобальный, но можно сделать и параметр с передачей по ссылке, надо описать в типах, подробнее смари совместимость типов у того же Фаронова например...
Цитата:| 2. Формирование массива Y, в котором элемент равен произведению элементов массива X, расположенных в i-ой строке ( ) |
не вижу трудностей, пиши процедуру get_vector(row, col:byte) по образу и подобию read_array(row, col:byte) и лепи произведения в глобальный вектор (одномерный массив)
п.п. 3 и 4 аналогично, не кодю по причине того что синтаксис забыл, и фрипаскаль не могу настроить на построчное выполнение (Ф7), сижу и тупо смарю на сообщение "2 ошибки" - догадайся мол сам где и какие ))
|
