Отметим в "ID_Родителя" женский пол:
1066, 1911, 926, 1949.
Найдем их детей и посчитаем разницу в возрасте:
1066 - 1911 = 1942 - 1971 = 29.
1066 - 1938 = 1942 - 1974 = 32.
1911 - 1079 = 1971 - 1998 = 27.
1911 - 941 = 1971 - 2010 = 39.
926 - 1900 = 1983 - 2012 = 29.
926 - 1932 = 1983 - 2016 = 33.
1949 - 1995 = 1966 - 2002 = 36.
1949 - 917 = 1966 - 2003 = 37.
В итоге, один ребенок, родившийся,
когда матери было меньше 28 лет.
Ответ: 1.
Var
i,k,n1,n2:integer;
begin
n1:=0; n2:=0;
Write('Введите 5 натуральных чисел: ');
for i:=1 to 5 do begin
Read(k);
if k mod 2<>0 then Inc(n1);
if (k mod 3=0) and (k mod 5<>0) then Inc(n2)
end;
Writeln('Нечетных- ',n1,', кратных 3 и не кратных 5- ',n2)
end.
<u>Пример</u>
Введите 5 натуральных чисел: 11 8 33 15 27
Нечетных- 4, кратных 3 и не кратных 5- 2
Var
M, N: integer;
begin
read(M, N);
var ar := arrrandom(10, N, M);
writeln('Полученный массив:');
ar.Println;
end.
Графика - вид исскуства, использующий графические примитивы.
Достоинства растровой графики:
1. Распространённый тип изображения.
Недостатки растровой графики:
1. Многоцветные растровые изображения имеют большой объём.
2. При уменьшении несколько соседних точек объединятся в одну, то есть теряется качество изображения.