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

Program voz; uses crt; var a,b,c,d,e,f : integer; begin write('какая сейчас дата? (д м г)'); read(a,b,c); write('введите дату вашего рождения (д м г)'); read(d,e,f); if (b> =e) and (a> =d) then writeln('вам ',c-f,' лет') else writeln('вам ',c-f-1,' лет'); end.

Pascalabc.net: begin   var a: =arrrandom(50,-500,500);   a.println;   var k: =a.where(x-> (abs(x) mod 10 = ;   var s: =a.where(x-> (abs(x) mod 10 = ;   if k=0 then writeln('в массиве нет элементов, оканчивающихся цифрой 3')   else writeln('среднее арифметическое элементов массива, оканчивающихся цифрой 3 = ',s/k); end. пример (для 10 элементов): 450 -159 189 463 262 220 -125 -41 -178 -62 среднее арифметическое элементов массива, оканчивающихся цифрой 3 = 463

Буфер обмена

в ос windows существует буфер обмена, в котором можно сохранить выделенную часть текста или рисунок. каким образом это сделать мы поговорим в статье рубрики «как создать документ в microsoft word 2007». в буфере обмена microsoft office можно сохранить несколько объектов (частей текста и(или) рисунков), причем переносить их можно между программами microsoft office, например взять из microsoft word и вставить в microsoft powerpoint. вкладка «буфер обмена»   в пункте меню «главное» программы microsoft   powerpoint аналогична. разберем вкладку «буфер обмена».