<span>Схема состава объекта отражает не только составные части, но и тот порядок, в котором предмет "разбирался" на части. Таким образом, она отражает строение (структуру) объекта.
Это цитата, переформулируй своими словами и чуть подробнее.</span>
Def animals(y):
return "Животное года - " + {
0 : "крыса",
1 : "бык",
2 : "тигр",
3 : "кролик",
4 : "дракон",
5 : "змея",
6 : "лошадь",
7 : "коза",
8 : "обезьяна",
9 : "петух",
10 : "собака",
11 : "свинья",
}.get(y)
n = int(input("Введите год: "))
print (animals((n-4) % 12))
Пример:
<span>Введите год: 2017
Животное года - петух</span>
1)Обязательные
1. Монитор
2)Необязательные
1. Колонки
2.Наушники
3. Принтер
<em>// PascalABC.NET 3.2, сборка 1439 от 09.05.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(10,-10,10); a.Println;
Writeln('Сумма положительных: ',a.Where(x->x>0).Sum)
end.
<u>Пример</u>
3 -4 9 -5 2 1 6 -4 10 -2
Сумма положительных: 31
Var n,m,p,s:integer;
begin
write('n=');
readln(n);
m:=n;k:=0;
write('цифры, которые >=4 и <=8 : ');
while m<>0 do begin
p:=m mod 10;
m:=m div 10;
if (p>=4) and (p<=8) then begin
write(p,' ');
s:=s+p;
end;
end;
writeln;
writeln('сумма этих цифр = ',s);
end.