Задание 1: отсутствует алгоритм (условие неполное - решения нет).
Задание 2: отсутствует алгоритм (условие неполное - решения нет).
Задание 3: i = 1, y = -14
Объяснение:Алгоритм:
1. Начало2. Ввод x,y3. y := y - x4. i := i + 15. Если y <= x , то возвращаемся к пункту 3, иначе:6. КонецПройдёмся по алгоритму:
1. Начало2. Ввод x,yВводим 12 и -2 (теперь x = 12, y = -2).
3. y := y - xУменьшаем переменную y на x (теперь y = -2 - 12 = -14).
4. i := i + 1Увеличиваем переменную i на 1 (теперь i = 0 + 1 = 1).
5. Если y <= x , то возвращаемся к пункту 3, иначе:6. КонецПроверяем: сейчас y = -14, x = 12, => условие "y <= x" выполняется, и мы переходим к пункту 6 -- конец.
Как мы видим, по завершении выполнения алгоритма i = 1, y = -14.
чтобы не задавать вручную, пусть он заполняется случайными числами в диапазоне от -50 до + 50
Free Pascal
const
n=10;
m=8;
var
x : array [0..n] of integer;
y : array [0..m] of integer;
z : array [0..n+m] of integer;
i, c, mi : integer;
begin
randomize;
writeln('Массив X');
for i:=0 to n-1 do begin
x[i] := random(100)-50;
if i<m then
y[i] := random(100)-50;
write(x[i], ' ');
end;
c:=0;
mi:=0;
for i:=0 to n-1 do begin
if x[i] mod 2 = 0 then c:=c+x[i];
if (x[i] < 0) and (x[i] < mi) then mi:=x[i];
end;
writeln();
writeln('Сумма чётных = ', c);
if mi<0 then
writeln('Наименьшее из отрицательных = ', mi)
else
writeln('Отрицательных элементов не найдено');
(*Задание 2 - объединить массивы a и b*)
writeln('Массив Y');
for i:=0 to n-1 do z[i]:=x[i];
for i:=0 to m-1 do begin
z[i+n]:=y[i];
write(y[i], ' ');
end;
writeln();
writeln('Массив Z');
for i:=0 to n+m-1 do
write(z[i], ' ');
end.
const
n=10;
var
b: array [1..n] of integer;
count,sum,pr,i:integer;
begin
count:=0; sum:=0; pr:=1;
for i:=1 to n do
begin
b[i]:=random(101)-50;
write(b[i]:4);
if (b[i] > 7) and (b[i] mod 4 = 0) then
begin
inc(count);
sum:=sum+b[i];
pr:=pr*b[i];
end;
end;
writeln;
if count > 0 then
begin
writeln('Count: ',count);
writeln('Summa: ',sum);
writeln('Proizvedenie: ',pr);
end
else writeln('Takix net');
end.
К 1 и 2 заданию отсутствуют алгоритмы. 3 задание i=1, y=-14
Объяснение:
Дан x=12 и y=-2. Происходит расчет y=y-x, т.е. y=-2-12=-14. Задача была сразу же выполнена. i=i+1 - количество произведенных операций. i=i+1, т.е. i=0+1