Как следует записывать условие отбора при фильтрации, которое позволит сформировать список девушек для участия в конкурсе красоты в январе 2013 г.? (отбираются девушки, имеющие рост более 178 см и возраст не менее 14 лет.) пол =”м” и рост > 178 и год рождения = 2003. пол =”д” и рост > 178 и год рождения < 2000. пол =”м” или рост > 178 или год рождения < 2000. пол =”д” или рост > 178 и год рождения < 2000.

пол =”д” и рост > 178 и год рождения < 2000.

ответ номер два

Program pr; uses crt; var n,i: integer; stepen, sum,a: real; begin     writeln('введите количество чисел n');     readln(n);     writeln('введите степень');     readln(stepen);     writeln();     sum: =0;       for i: =1 to n do     begin            write('введите ',i,' число: ');             readln(a);             sum: =sum+a;     end; writeln('sum = ',sum); writeln('sum^',stepen,' = ',power(sum, stepen)); readln; end.

//pascalabc.net 3.0 const  n = 5; begin   var a : = arrrandomreal(n);   var b : = arrrandomreal(n);   write('длины первого катета: ');   foreach var i in a do write(i : 5 : 2);   write(newline, 'длины второго катета: ');   foreach var i in b do write(i : 5 : 2);   var imax : = 0;   for var i : = 1 to n - 1 do     if a[imax] * b[imax] < a[i] * b[i] then       imax : = i;   writeln(newline, 'номер: ', imax + 1);   writeln('катеты: ', a[imax] : 0 : 2, ' ', b[imax] : 0 : 2);   writeln('площадь: ', a[imax] * b[imax] / 2 : 0 : 2); end.