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

сочинете басню про оленя медведя

Ответы

Автор ответа: baha20052014
0
в лесу бродит олень одинокий.И медведь бродит.Вдруг они встретились и говорят будеш су си пуси
Предыдущий вопрос
Следующий вопрос
Похожие вопросы
Предмет: ОБЖ, автор: sodnom41
1. Как классифицируются аварии на XОО по масштабам последст
2. При какой из степеней вертикальной устойчивости атмосферы.
инверсии, изотермии или конвекции, быстрее произойдет рассеива-
3. Расскажите, как оборудуются специальные машины и емкости,
Вопросы и задания
ние зараженного воздуха и почему?
предназначенные для транспортировки АХОВ.
4. Чем опасна разлитая ртуть? Какие действия следует предпринят
при разливе ртути?
5. Какая отличительная особенность аварий на Ход определяет при
оритетность медицинской помощи в первые часы после аварии?
6. Нарисуйте форму зоны заражения при скорости нетра: 0.5 м/с
0,6—1 м/с, 1, 1—2 м/с; более 2 м/с.
7. Охарактеризуйте очаг поражения быстродействующими лодити
ми веществами. .​
6 лет назад
Предмет: История, автор: alinanaumcik647
Помогите пожалуйста, срочно, какой пункт выбрать и почему? ​
6 лет назад
Предмет: История, автор: nikitav6532
походы батыя на русь 1206-1227
6 лет назад
Предмет: Информатика, автор: Ольга35
Помогите найти ошибки - Паскаль.
Условие: Дан одномерный массив, состоящий из вещественных элементов. Найти произведение элементов массива, расположенных между максимальным по модулю и минимальным по модулю элементами.

Не совсем то выводит
program proizvedenie;
var q,z,w,i,n,i1,i2:integer;
a:array[1..1000] of real;
amin,amax,pr:real;
begin
assign (input,'input.txt');
assign (output,'output.txt');
reset (input);
rewrite (output);
readln(n);
for i:=1 to n do read (a[i]);
amin:=a[1];
for i:=1 to n do
begin
if a[i]<amin then
begin
amin:=a[i];
i1:=i;
end;
end;
amax:=a[1];
for i:=1 to n do
begin
if a[i] > amax then
amax:=a[i];
i2:=i;
end;
if i2>i1 then begin
q:=i1;
w:=i2;
end
else begin
q:=i2;
w:=i1;
end;
if (w-q)>1 then begin
pr:=1;
for z:=q to w do
pr:=pr*a[z];
end
else write (0);
close (input);
close (output);
end.
9 лет назад
Предмет: Информатика, автор: LizaGurina

найдите произведение элементов одномерного массива из 7 элементов значение которых вводится через клавиатуру и является целым.
Хелп!!! 
9 лет назад