Войти Регистрация Спроси ai-bota

Дано n чисел найдите минимальное из них

Ответ:

skskanshhd

08.10.2020 05:12

Uses crt;
var x,i,n,min;integer;
begin
readln(n);
read(x);
min:x;
for i:1 to n-1 do
begin
readln(x);
if min > x then min:x;
end.

0,0(0 оценок)

Популярные вопросы: Информатика

dima1tod

24.10.2020 16:08

20 , , 8 класс выберете верный путь к файлу post.txt , который находится на ftp сервере ftp.school.ru в папке doc 1)http//school.ru/doc 2)https//school.ru/doc 3)http:...

Siyahbeyazask1

28.08.2020 01:34

Найдите десятичные эквиваленты чисел по их прямым запишите в 8-разрядном формате со знаком . 01010101 11111000...

kseniiazueva93

20.07.2021 04:00

Пример известной вам функциональной зависимости...

barbariskaulyaЮлия

17.06.2020 05:02

1. создать массив вещественных чисел. выбрать среди отрицательных чисел наименьшее значение. вывести на экран: исходный массив, координату найденного элемента. 2. создать...

45172

27.12.2022 23:27

Люди до ть написати висновок до теми:особливості функціування ока людини! ів дуже вчителька жде відповіді...

Izijjkghkk

07.06.2023 21:43

Как проводиться Первая медицинеская если у человека поражена плечевая артерия?...

pomoch5

23.01.2023 17:07

Цифры от 1 до 9 включительно пишутся на листах бумаги, которые затем складываются в ящик и тщательно перемешиваются. Наугад вынимается один листок. Какова вероятность...

graulity

10.04.2023 02:58

Ввести значение трех целых переменных а ,b ,c . Направить указатели на эти переменные. С указателя увеличить значение а в два раза . Затем поменять местами значение переменных...

Uknowmyname

16.08.2022 01:30

Напишіть код для відображення в написі Label2 тексту місце в текстовом поле Едіт 2...

Karina2048

22.02.2023 06:20

2. Якщо дискримінант квадратного рівняння дорівнює 15, токвадратне рівняння...А. не має коренів;Б. має один корінь;В. має два різних корені; . Г. має безліч коренів....

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку