если массив состоит из 10 элементов то код программы:
const
n=10;
var
a: array[1..n] of integer;
i,min: integer;
begin
for i: =1 to n do read(a[i]); {вводишь заданный массив}
min: =32767;
for i: =1 to n do
if a[i]< min then min: =a[i];
write(min);
end;
Ответ дал: Гость
если сравнивать объекты и их свойства между собой, то можно говорить о свойствах общих и отличительных.общие свойства объединять объекты в группу (группа – это множество объектов, где каждый объект является элементом этого множества). отличительные свойства отличить один объект от другого. например, свойство «защищать ноги» – это общее свойство ботинок, сапог, сандалий и туфель. а вот свойство «хранить тепло» – это отличительное свойство зимней обуви, если сравнивать её с летней.
информация бывает - визуальная (зрение) и звуковая (слух).
вкусовая, тактильная, обонятельная.
Ответ дал: Гость
поправьте меня если ^ это не указатель стпени, но если это степень то вот просто:
var a,x: extended; n,i: longint; begin read(x); read(n); a: =1; for i: =1 to n do a: =a*x; writeln(a: 0: 0); end.
Ответ дал: Гость
program qwe;
uses crt;
var c, s, i: integer; y: real;
begins: =0; c: =0; for i: = -2 to 27 dobegins: =s+i; c: =c+1; y: =s/c; end; writeln('srednee arifmeticheskoe=',y);
readln; end.
вот так вот должна быть 1 . ты ни где не илпользовал(а) счетчик, а это неправильно=) в этом твоя и была ошибка=)
Популярные вопросы