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

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

Показать ответ

Ответ:

zbwbsh

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 оценок)

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

ktjy123

23.06.2020 21:56

определите информационный объем стереоаудиофайла длительностью звучания 5 секунд при частоте 48 кГц и глубиной кодирования 65536 уровней...

maririz405

27.07.2021 23:33

Графическое изображение, объемом 384 кб, использует 64-цветную палитру. Ширина изображения равна 1024 точки. Найти высоту изображения. Записать все формулы, вычисления по...

Имра11111

03.11.2020 06:38

Найти среднее арифметическое n-чисел, введенных с клавиатуры, кратных 3 и 5 одновременно. в паскале....

Bananthic

02.06.2022 00:11

Сколько страниц текста можно разместить в памяти, если но одной странице 40 строк по 60 символов(1сивол- 1 байт). какова высота стопке, если 100 страниц 1 см....

shvffvvfff

02.06.2022 00:11

Составить программу(паскаль): даны действительные числа x, y, z. вычислить min2(x+y+z/2, xyz)+1...

ооррр3

18.04.2020 22:23

1)вычислите объём черно-белого (без градаций серого) изображения в байтах, если одна клетка на рисунке соответствует пикселю 2) для хранения растрового изображения размером...

Ангелина22325

20.04.2023 18:04

Написать программу в паскале: 1) вводятся 10 целых чисел. подсчитать количество четных среди них 2) вывести на экран все трехзначные числа, сумма цифр которых равна n (значение...

alena11021

20.04.2023 18:04

Решить: определите значение целочисленных переменных х, y, z после выполнения фрагмента программы: x: = 13 y: = 3 z: =x x: = z div y y: = x...

marylist2005

04.10.2022 21:23

Найти сумму и произведение всех нечетных двухзначных чисел (алгоритм и программу)...

bringm1

04.10.2022 21:23

Ввоскресенье 19 студентов побывали в планетарии, 10 – в цирке и 6 – на стадионе. планетарий и цирк посетили 5 студентов; планетарий и стадион-3; цирк и стадион -1. сколько...

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

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