Составить программу, выводящую на экран сведения о периодических изданиях (наименование издания, тираж, годовая стоимость сначала вывести сведения, отсортированные по возрастанию тиража, затем вывести сведения, отсортированные по наименованию по алфавиту.

Var i, k, n, j, z, x: integer; b, c, d: array[1..10000] of integer; a, e: array[1..10000] of string; m: string; begin readln(n); for i: =1 to n do readln(a[i]); readln(b[i]); readln(c[i]); for i: =1 to n do for j: =1 to n do if b[i]< b[j] then begin m: =a[i]; a[i]: =a[j]; a[j]: =m; z: =b[i]; b[i]: =b[j]; b[j]: =z; x: =c[i]; c[i]: =c[j]; c[j]: =x; end; for i: =1 to n do writeln(a[i],' ',b[i],' ',c[i]);   {это сортировка по тиражу} for i: =1 to n do begin e[i]: =copy(a[i], 1, 2); {тут расчет на то, что название начинается с заглавной буквы алфавита} val(e[i], d[i]); end; for i: =1 to n do for j: =1 to n do if d[i]< d[j] then begin m: =a[i]; a[i]: =a[j]; a[j]: =m; z: =b[i]; b[i]: =b[j]; b[j]: =z; x: =c[i]; c[i]: =c[j]; c[j]: =x; end; for i: =1 to n do writeln(a[i],' ',b[i],' ',c[i]); {сортировка по тиражу} readln; end.

1.) var s, i: integer; begin for i: =-30 to 40 do if i mod 2 < > 0 then s: =s+i; writeln(s); end.2.)var s, i: integer; beginfor i: =-50 to 120 doif i mod 9 = 0 then s: =s+1; writeln(s); end.3.)var p, i: integer; beginfor i: =-10 to 20 dobeginif i=1 then p: =1; if i mod 11 = 0 then p: =p*i; end; writeln(p); end.4.)var n, d, i, p: integer; beginp: =1; write('введите n> > '); readln(n); for i: =1 to n dobeginwrite('введите ', i, '-ое число> > '); readln(d); p: =p*d; end; writeln(p); end.

поставь и лучший ответ

Объяснен

Роботы в повседневной жизни

Основная цель создания роботов – избавление человека от выполнения тяжелой, опасной или рутинной работы. Попросту говоря, это устройства должны не заменить человека полностью, но освободить его мысли и руки от монотонной работы. Это позволяет человеку сосредоточиться на разработке уникальных проектов и выполнении задач, где требуется не только точность, но и интуиция, индивидуальный вкус и опыт, а роботу достичь максимальных показателей эффективности и производительности.

По своему назначению и применению роботы бывают промышленные, строительные, транспортные, бытовые, исследовательские; относительно размеров делятся на гигантские, миниатюрные, сверхминиатюрные (применяемые для нанотехнологий); с точки зрения независимости – стационарные и мобильные. Каждый из этих категорий имеет подвиды и направления, как, например, среди промышленных роботов могут быть сварочные или упаковочные устройства.

Но сегодня мы сосредоточим свое внимание на бытовых роботах, которые будут актуальны для выполнения ежедневных человеческих задач.

Какие виды роботов существуют

ассистенты-компаньоны;

уборщики;

в саду или на участке;

игрушки;

учителя.