Подберите для суждения " системный блок, клавиатура, мышь и монитор образуют комплект устройств, для работы компьютера " подходящую по смыслу логическую связку : 1) необходимых 2) достаточных 3) необходимых и достаточных
По сути как без всего этого ничто друг без друга не будет работать.это правильный ответ.
snabomp
02.03.2022
Var i,j,k,b: integer; a: array[1..7,1..7]of integer; begin for i: =1 to 7 do begin for j: =1 to 7 do begin a[i,j]: =random(10); write(a[i,j],' '); end; writeln; end; writeln('введите k и b: '); readln(k,b); for j: =1 to 7 do a[k,j]: =a[k,j]+b; writeln('измененный массив: '); for i: =1 to 7 do begin for j: =1 to 7 do write(a[i,j]: 4); writeln; end; end.
LIN1022
02.03.2022
1)var a: integer; begin writeln('введите число'); readln(a); if (a mod 2=0) then write('чётное ') else write('нечётное '); if (a div 100> =1)then write('трёхзначное число') else if (a div 10> =1)then write('двузначное число') else writeln('однозначное число'); end.2)var a,b,c: real; begin writeln('введите 1 число'); readln(a); writeln('введите 2 число'); readln(b); writeln('введите 3 число'); readln(c); if (a< b)and (b< c) then begin a: =2*a; b: =2*b; c: =2*c; end else begin a: =(-1)*a; b: =(-1)*b; c: =(-1)*c; end; writeln(a); writeln(b); writeln(c); end. 3)var a,b,c: integer; begin writeln('введите 1 число'); readln(a); writeln('введите 2 число'); readln(b); writeln('введите 3 число'); readln(c); if a=b then writeln('3') else if b=c then writeln('1') else writeln('2'); end.