Заполните случайными числами в диапазоне от 1 до 5 два массива: А[1:20] и В[1:20].найдите и выведите на экран тoлько те элементы этих массивов, значения которых совпадают. Например, если A[2]=B[2]=4, то на экран надо вывести: Номер: 2 значение: 4
НА ЯЗЫКЕ ПАСКАЛЬ
Ответы
Ответ дал:
0
var a,b: array[0..19] of Integer;
i: Integer;
begin
for i:=0 to 19 do
begin
a[i]:=random(5)+1;
b[i]:=random(5)+1;
end;
for i:=0 to 19 do
begin
if a[i]=b[i] then writeln('Номер: ',i,', значение: ',a[i]);
end;
end.
i: Integer;
begin
for i:=0 to 19 do
begin
a[i]:=random(5)+1;
b[i]:=random(5)+1;
end;
for i:=0 to 19 do
begin
if a[i]=b[i] then writeln('Номер: ',i,', значение: ',a[i]);
end;
end.
Ответ дал:
0
спасибо
почему от 0 до 19?
а не от 1 до 20?
почему от 0 до 19?
а не от 1 до 20?
Ответ дал:
0
Это тоже самое.
Ответ дал:
0
Так легче с массивом работать.
Ответ дал:
0
а как сделать вторую часть задания с выводом на экран ?
Ответ дал:
0
уже делал.
Вас заинтересует
1 год назад
1 год назад
2 года назад
8 лет назад
8 лет назад
8 лет назад