Предмет: Информатика,
автор: igor156357
Заполните массив а [1..10] случайными целыми числами в диапазоне от -10 до 10 и найдите сумму минимального элемента массива и второго элемента массива.
Ответы
Автор ответа:
1
program fantscrin;
const n = 10;
var a: array [1..n] of integer;
i,min:integer;
Begin
for i:=1 to n do
a[i]:= random(21)-10;
for i:=1 to n do
write(a[i], ' ');
min:=a[1];
for i:=1 to n do
if (a[i]<min) then min:=a[i];
writeln('');
writeln(min+a[2]);
End.
igor156357:
спасибо
Похожие вопросы
Предмет: Математика,
автор: anna5335
Предмет: Русский язык,
автор: diushekeevaasel
Предмет: Русский язык,
автор: alinkaroma192
Предмет: Литература,
автор: Аноним
Предмет: Математика,
автор: Аноним