Даны два одномерных массива А и В. Подсчитайте количество тех i, для которых: а) А меньше B б) A = B; в) A больше B помогите,пожалуйста
Даны два одномерных массива А и В. Подсчитайте количество тех i, для которых:
а) А < B
б) A = B;
в) A > B
помогите,пожалуйста
Гость
Ответ(ы) на вопрос:
Гостьvar
a,b:array[1..100] of integer;
x,y,z,i,n:integer;
begin
read(n);
for i:=1 to n do read(a[i]);
for i:=1 to n do read(b[i]);
for i:=1 to n do begin
if a[i]>b[i] then inc(z) else
if a[i]end;
write(x,' ',y,' ',z);
Не нашли ответ?
Похожие вопросы