Предмет: Информатика,
автор: daniilryabov29
Составить программу, формирующую массив b[2],каждый элемент которого является максимальным из соответствующих элементов массивов а[4] и с[4]
Ответы
Автор ответа:
0
var
i:integer;
a,c:array[1..4]of integer;
b:array[1..2]of integer;
begin
write('Массив а: ');
for i:=1 to 4 do
begin
a[i]:=random(10);
if a[i]>b[1] then b[1]:=a[i];
c[i]:=random(10);
if c[i]>b[2] then b[2]:=c[i];
write(a[i],' ');
end;
writeln;
write('Массив c: ');
for i:=1 to 4 do write(c[i],' ');
writeln;
write('Массив b: ');
for i:=1 to 2 do write(b[i],' ');
end.
i:integer;
a,c:array[1..4]of integer;
b:array[1..2]of integer;
begin
write('Массив а: ');
for i:=1 to 4 do
begin
a[i]:=random(10);
if a[i]>b[1] then b[1]:=a[i];
c[i]:=random(10);
if c[i]>b[2] then b[2]:=c[i];
write(a[i],' ');
end;
writeln;
write('Массив c: ');
for i:=1 to 4 do write(c[i],' ');
writeln;
write('Массив b: ');
for i:=1 to 2 do write(b[i],' ');
end.
Автор ответа:
0
не пойму вроде ты все верно написал но когда пишу прошу в Паскале ошибку выдает
Похожие вопросы
Предмет: Литература,
автор: vika123kira123
Предмет: История,
автор: mariy0000
Предмет: Қазақ тiлi,
автор: nazikoo10
Предмет: Химия,
автор: bYYFSFDGDFGDFSGSD
Предмет: Алгебра,
автор: Санечка28