Предмет: Литература, автор: Alexchannel66

что высмеевает крылов в басне зеркало и обезьяна

Ответы

Автор ответа: mvuser116

0

лесть,лож,глупость,ленивость

Автор ответа: Alexchannel66

0

не не это

Автор ответа: jackanus

0

Крылов высмеивает жадность ,глупость ,хваставство

Предыдущий вопрос

Следующий вопрос

Похожие вопросы

Предмет: Физика, автор: tanaostras2

Як залежить Архимедова сила вид густины ридыны

7 лет назад

Предмет: История, автор: Аноним

Зовнішня політика Казимира ІІІ полягала:

1. вирішував спірні питання з сусідами за допомогою війни
2.вирішував спірні питання з сусідами за допомогою дипломатії
3 .не вирішував взагалі спірних питань

P.s. очень срочно!!!

7 лет назад

Предмет: Биология, автор: olga19861986wasilewn

что такое половое размножение

7 лет назад

Предмет: Математика, автор: artemievainga

Найдите значение выражения корень из (x +2) в квадрате,при x = -3.99

10 лет назад

Предмет: Информатика, автор: krolik23812

Упорядочить последовательность по убыванию элементов и выдать на экран все элементы, большие некоторого заданного числа. И вот как раз это некоторое заданное число я взяла "с=2000". Не могу написать часть программы, которая бы как раз и обозначала вывод на экран последовательность чисел, которые были бы больше заданного числа.. :(

Program mas1;
uses crt;
Var a: array [1..30] of real;
i,n,P,k,c: integer;
d: real;
Begin
repeat
Write(' Введите 0 Readln(n);
if (n<0) or (n>30) then
writeln(' n неправильно введено');
until (n>=1) and (n<=30);
P:=2;
For k:=1 to n do
Begin
P:=P*(k+2);
a[k]:=P*cos(k);
end;
writeln(' Получен массив А');
for i:=1 to n do
writeln('A[',i:2,']=',A[i]:15:3);
writeln;
For i:=1 to n do
for k:=1 to n-i do
if a[k] begin
d:=a[k];
a[k]:=a[k+1];
a[k+1]:=d
end;
writeln;
writeln(' Массив по убыванию');
for i:=1 to n-1 do
writeln('A[',i:2,']=',A[i]:15:3);
writeln;
c:=2000;

?

end.

10 лет назад