3 года назад

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

2 ответа:

0 0

Добродетельные качества - положительные нравственные качества характера, стремление человека к добру.

Добродетельные качества которыми обладают падчерицы из вышеупомянутых сказок;
- трудолюбие ( усердное выполнение любой работы )
- доброта;
- честность;
- скромность;
- милосердие;
- отзывчивость;
- терпение;
- вежливость;
- способность сопереживать;
- уважение к другим людям;

Nadien3 года назад

0 0

Доброта, великодушие, внимательность к людям и их беде, трудолюбие, отзывчивость, скромность, понимание, щедрость, душевная теплота.

Читайте также

Что такое КИШЕЧНАЯ ПЕРИСТАЛЬКА. Минимум 3 значения

Andrey Yeliseyev [431]

Мышечное сокращение в полых органах

0 0

4 года назад

Прочитать ещё 2 ответа

Напиши добродетели , которые ты можешь воспитать в себе

НаталиЧунахян

Щедрость ,доброта,любовь к близким

0 0

4 года назад

Прочитать ещё 2 ответа

Почемк в странах Древнего Востока школы возникали при храмах и дворцах?

Паша1

<h3>не только востока читать и писать раньше умели только писали придворные и жрецы [церковнослужители] вот в церквях грамоте и обучали на религиозных книгах появление светских школ знаменуется в той или иной степени отделения церкви/религии от управления государственными делами что происходит в разное время у разных народов</h3>

0 0

4 года назад

Растения животные человек это?

Авиагородок [18]

Живая природа =)))))

0 0

4 года назад

Организовать ручное заполнение целочисленного одномерного массива. Заменить все максимальные элементы массива на произведение ма

АнастасияЕвгеньевна

Ответ:

Объяснение:

type arr=array[1..100] of integer;

var

a:arr;

i,j,k,n:integer;

procedure PrintArr(a:arr;n:integer;s:string);{процедура печати массива}

var

i:integer;

begin

write(s);

write('[');

for i:=1 to n-1 do write(a[i],',');

writeln(a[n],']');

end;

procedure EnterArr(var a:arr;n:integer;s:string);{заполнение массива}

var

i:integer;

begin

write(s);

for i:=1 to n do read(a[i]);

end;

begin

repeat

write('n(1..100)=');

readln(n);

until (n>0) and (n<101);

EnterArr(a,n,'A=');

k:=a[1];

for i:=1 to n do if a[i]<k then k:=a[i];

writeln('Min=',k);

PrintArr(a,n,'A_orig=');

for i:=1 to n do if a[i]=k then a[i]:=i*i;

printArr(a,n,'A_new=');

readln;

end.

0 0

4 года назад