Придумать и описать структуру таблицы базы данных, которая содержит четыре поля различных типов: символьного, числового (целого или вещественного), дата, логического. таблица должна содержать реальную информацию и иметь название.
мини-сочинение (половина страницы или одна страница) на одну из тем :1-Какой создания текста-компьютерный или рукописный-вамнравится больше? 2-Одно из значений слова "редактор"-лицо,исправляющее рукопись.Объясните ,почему компьютерные программы для создания текстов назвали текстовыми Редакторами?
Const n=10; var a,b,c:array[1..n] of real; i:integer; begin Writeln('Введите элементы массива'); for i:=1 to n do Read(a[i]); Writeln(' A B C'); for i:=1 to n do begin b[i]:=a[n-i+1]; c[i]:=(a[i]+b[i])/2; Writeln(a[i]:7:3,b[i]:7:3,c[i]:7:3) end end.
Const n=40; var a:array[1..n] of integer; i,amax,n1,nn:integer; begin Randomize; Writeln('Элементы массива'); amax:=0; for i := 1 to n do begin a[i]:=Random(61)+170; { [170..230] } Write(a[i]:4); if amax<a[i] then begin amax:=a[i]; n1:=i; nn:=i end else begin if amax=a[i] then nn:=i end end; Writeln; Writeln('Номер первого автомобиля ',n1,', последнего- ',nn) end.
