Значения двух массивов a[1..10] и b[1..10] с следующего фрагмента программы: for i: =1 to 10 do a[i]: =10-i; for i: =1 to 10 do b[i]: =a[5] – a[i] сколько элементов массива будут иметь отрицательные значения? 1) 0 2) 5 3) 10 4) 4

Лиза45111 Лиза45111    1   19.05.2019 03:00    2

Ответы
anytabudanova anytabudanova  30.09.2020 21:53

var A:array[1..10] of integer;
var B:array[1..10] of integer;
var i,j:integer;
begin
  for i:=1 to 10 do
  A[i]:=10-i;
  for i:=1 to 10 do
  B[i]:=A[5] - A[i];
  for i:=1 to 10 do begin
  writeln(A[i]);
  writeln(B[i]);
  end;
  readln;
end.

 

ответ: 4

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика