Технологии программирования

ВЫПОЛНИТЬ 3 задания в Контрольной + 1 тест
Задания
Вариант 0.
1. Написать функцию для определения n при котором сумма ряда будет вычислена с точностью 10-3
2. Заполнить случайными числами 3 массива a, b, c. Найти сумму отрицательных элементов для всех 3-х массивов.
3. Определить, что будет выведено на печать в каждом из 4-х вариантов:
Var c,d : integer;
Procedure P (x,y : integer)
begin y:=x+1 end;
Procedure Q (x : integer; var y : integer)
begin y:=x+1 end;
Procedure R (var x, y : integer)
begin y:=x+1 end;
• c:=1; d:=4; P(c+5*d, d); writeln (d);
• c:=1; d:=4; Q(c+5*d, d); writeln (d);
• c:=1; d:=4; R(c+5*d, d); writeln (d);
• c:=1; d:=4; R(c, d); writeln (d);