Правильный ответ: б так как без системного блока комп не будет работать без клавиатуры не сможем печатать а без монитора ничего не увидим. вроде так
ivanrancev
20.05.2022
Var i, n, m: integer; h: boolean = true; begin writeln('начальное значение х должно быть меньше конечного иначе программа не сработает! '); write('введите начальное значение х > > > '); read(n); write('введите конечное значение х > > > '); read(m); writeln('===================================='); for i : = n to m do if h = true then begin writeln('x=', i, ' y=', 2 * i + 5); h : = false; end else h : = true; end.
Kostyuchik-Astakhov531
20.05.2022
Const n=20; var x : array[1..n] of integer; i, max, min : integer; begin randomize; writeln('исходный массив: '); for i: =1 to n do begin x[i]: =random(181)-50; write(x[i],' '); end; writeln; max: =x[1]; min: =x[1]; for i: =2 to n do begin if x[i] > max then max: =x[i]; if x[i] < min then min: =x[i]; end; writeln('max=',max,' min=',min); end.пример: исходный массив: -34 -23 -38 15 108 21 -25 -29 15 -34 34 8 20 76 -27 -43 -17 89 95 -28 max=108 min=-43