Для того чтобы дать детям понятия _ , подбирают вещи одинакового цвета, равные по ширине и толщине, отличающиеся одна от другой

Question

Другие предметы: Для того чтобы дать детям понятия _ , подбирают вещи одинакового цвета, равные по ширине и толщине, отличающиеся одна от другой

lizo4eek · Answer

var s :string;i, j, dva, otv :integer; beginwrite (‘vvedite dvoichnoe chislo = ’);readln (s);for i := 1 to length(s) doif strtoint (s[i]) 0 thenbegindva:= 1;for j:= 1 to length(s)-i dodva:=dva*2;otv:=otv+dva;end;writeln(otv);readln;end....

Для того чтобы дать детям понятия _ , подбирают вещи одинакового цвета, равные по ширине и толщине, отличающиеся одна от другой

Популярные вопросы