Стр 28 6)В левом столбце переставьте слова так, чтобы они соответствовали правому страница абзац слово - id1407960520220215 от Александра24х4 15.02.2022 12:45

Question

Информатика: Стр 28 6)В левом столбце переставьте слова так, чтобы они соответствовали правому страница абзац слово шрифт Цвет,размер,толщина,цвет фона,интервал знаков,отступ от поля,вид письма, выравнивание,межстрочный инвертал ,масштаб, линия границы,отступ главной строки,маркирование,невидимые знаки,линейка,текстура, подчеркнутость, передвижения И СЕЙЧАС

Александра24х4 · Accepted Answer

Program test;
var a: array of integer; b: array of integer; c: array of integer; aa, bb, cc: integer;
begin writeln('Введите размер массива a'); readln(aa); writeln('Введите размер массива b'); readln(bb); a := new integer[aa]; b := new integer[bb]; c := new integer[aa + bb]; cc := 0; aa := 0; bb := 0; writeln('Заполнение массива a'); while(aa < Length(a)) do begin readln(a[aa]); aa := aa + 1; end; writeln('Заполнение массива b'); while(bb < Length(b)) do begin readln(b[bb]); bb := bb + 1; end; while(cc < Length(c)) do begin if(cc < Length(a)) then begin c[cc] := a[cc] end else begin c[cc] := b[cc - Length(a)]; end; cc := cc + 1; end; writeln('Полученный массив'); cc:=0; while(cc < Length(c)) do begin writeln(c[cc]); cc:=cc+1; end;end.

MOGZ ответил