Заполните случайными числами в диапазоне от 1 до 5 два массива: а[1: 20] и в[1: 20]. найдите и выведите на экран только те элементы этих массивов, значения которых . например, если а[2]=в[2]=4,то на экран надо вывести: номер: 2 значение: 4.если таких совпадений нет, то выведите на экран сообщение об этом.
217
331
Ответы на вопрос:
Var a, b : array [1..20] of integer; i : integer; f : boolean; begin randomize; for i: = 1 to 20 do begin a[i]: = random(5); b[i]: = random(5); end; f: = false; for i: = 1 to 20 do if a[i] = b[i] then begin f: = true; writeln('номер: ',i,' значение: ',a[i]); end; if f = false then writeln(' элементов нет! '); end.
Популярно: Информатика
-
vani200607.03.2021 09:45
-
Islamiks09.06.2021 15:25
-
nikitafill12319.07.2020 04:21
-
dranithkindana26.04.2020 18:02
-
ilyaastafiev2021.08.2022 10:06
-
щгоот19.04.2020 00:07
-
KATE421301.02.2023 18:54
-
cristinapavlova08.06.2021 03:23
-
gg22809.04.2022 13:32
-
Kristia0302.01.2021 19:33