Program mm; var a:array[1..12] of integer; begin for i:=1 to 12 do begin а[1]:=5; а[2]:=4; а[3]:=-3; а[4]:=1; а[5]:=0; а[6]:=-4; а[7]:=(у тебя не написано); а[8]=25; а[9]=-8; a[10]=-5; а[11]=-17; а[12]=-1; end; writeln('Вот исходный массив'); for i:=1 to 12 do writeln('A[',i,']=',a[i]); for i:=1 to 12 do begin if (A[i]<0) then a[i]:=1; if (a[i]>0) then a[i]:=-5; end; writeln('Вот полученный массив'); for i:=1 to 12 do writeln('A[',i,']=',a[i]); writeln(' Введите 12 чисел'); for i:=1 to 12 do readln(A[i]); (это доп оценка) end.
filippovev1
05.08.2020
Следует отметить, что 1 условие выполняется во всех цепочках, а значит его можно не рассматривать. Рассмотрим каждую комбинацию отдельно: HDEE 2 условие - true 3 условие - true 4 условие - true Подходит HHAE 2 условие - true 3 условие - false(H на 2 месте) HEAE 2 условие - true 3 условие - true 4 условие - true Подходит AHAH 2 условие - true 3 условие - true 4 условие - true Подходит AEAD 2 условие - true 3 условие - true 4 условие - true Подходит AEED 2 условие - false(E на 3 месте) CAEH 2 условие - false(A не входит в список допустимых значений) EHAD 2 условие - true 3 условие - false(E не входит в список допустимых значений) CDEA 2 условие - true 3 условие - true 4 условие - false(A не входит в список допустимых значений) ответ: 4
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Ребят Яке значення функції ЕСЛИ(ИЛИ(3<5; 4<8); 8; 12)?
var a:array[1..12] of integer;
begin
for i:=1 to 12 do begin
а[1]:=5;
а[2]:=4;
а[3]:=-3;
а[4]:=1;
а[5]:=0;
а[6]:=-4;
а[7]:=(у тебя не написано);
а[8]=25;
а[9]=-8;
a[10]=-5;
а[11]=-17;
а[12]=-1;
end;
writeln('Вот исходный массив');
for i:=1 to 12 do writeln('A[',i,']=',a[i]);
for i:=1 to 12 do begin
if (A[i]<0) then a[i]:=1;
if (a[i]>0) then a[i]:=-5;
end;
writeln('Вот полученный массив');
for i:=1 to 12 do writeln('A[',i,']=',a[i]);
writeln(' Введите 12 чисел');
for i:=1 to 12 do readln(A[i]); (это доп оценка)
end.