Register

OR

Do you already have an account? Login

Login

OR

Don't you have an account yet? Register

Newsletter

Submit to our newsletter to receive exclusive stories delivered to you inbox!

Помогите составить программу в Paskal!1) Вычислите значение минимального элемента массива2) Вычислите сумму минисального и максимального элементов3) Выведите номер минимального элемента4) Выведите номера максимальных элементов и их количество

более месяца назад
Просмотров : 21    Ответов : 1   

Лучший ответ:

Номера минимума и максимума не получается сделать паскаль выделывается чо то
var a: array[1..5] of integer; i,min,max,summa,nmin,nmax:integer;begin
for i:= 1 to 5 do readln(a[i]);
min:=a[1];for i:= 2 to 5 dobeginif a[i]end;
max:=a[1];for i:= 2 to 5 dobeginif a[i]>a[1] then max:=a[i];end;summa:=min max;
writeln('min=',min);writeln('min max=',summa);writeln('nomer min=',nmin);writeln('nomer mmax=',nmax);
end.

более месяца назад
Ваш ответ:
Комментарий должен быть минимум 20 символов
Чтобы получить баллы за ответ войди на сайт





Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров и нажмите кнопку Просмотр анимации.


Другие вопросы: