1. Информатика
  2. Написать программу на паскале:

Написать программу на паскале: у юного фермера тимы 5 кроликов. определите минимальный вес кроликов(вес каждого задать произвольно)

daha77 daha77    1   09.03.2019 20:50    2

Ответы
alliekw3p0144w alliekw3p0144w  24.05.2020 12:23

var a: array [1..5] of real;

      i: integer;

      min: real;

begin

  min:=1000;

  for i:=1 to 5 do begin

    readln(a[i]);

    if a[i]<min then min:=a[i];

                         end;

  writeln('Минимальный вес равен ',min);

end.

    

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Kitty85 Kitty85  20.09.2019 17:20
Какая информация потеряла свою актуальность? 1.в природе существуют сила тяжести, сила гравитации, сила трения и сила . 2.стоимость проезда в трамвае меньше, чем в других...
Нифи2005 Нифи2005  20.09.2019 17:10
Составить программу наименьшего четырёх чисел и вывода на экран его квадрата...
eldardadashov eldardadashov  20.09.2019 17:10
Медведь, впадая в зимнюю спячку, весил 200 кг. каждый день во время сна он худеет на 1700 г. через сколько дней медведь проснётся, если условием его выхода из зимней спячки...
Иришка2007Шеховцова Иришка2007Шеховцова  20.09.2019 17:10
Составить программу наименьшую из 4 чисел и вывода на экран его квадрата...
azatnacu azatnacu  20.09.2019 17:10
34 цикл в фрагменте программы p: =2; repeat p: =p*0.1 until p 0.1; будет исполнен: выберите один ответ: 1) 2 раза 2) 1 раз 3) бесконечное число раз 4) 0 раз...
tima14priluki tima14priluki  20.09.2019 15:48
1)описать свою систему счисления , пример двух чмсел ,сделал их развернутую запись ,найти десятичный эквивалент. 2)выполнить перевод следующих чисел в десятичную систему счисления...
Erkinbekulbosin Erkinbekulbosin  20.09.2019 16:16
Как сделать схему понятий информатика,информация,данные,сигналы,информационные процессы (в текстовом редакторе word) скинуть фото схемы как сделать и видео в ютубе....
Слендер12 Слендер12  20.09.2019 17:01
Help ! определите значение переменных s и i после выполнения фрагмента программы: s: =0; i: =5; while i =0 do begin s: =s+i; i: =i-1; end; выберите один ответ: s=5, i=0 s=15,...
LANOVI LANOVI  20.09.2019 17:00
Для вычисления квадратного корня из х используется функция: выберите один ответ: 1) int (x) 2) sqr (x) 3) sqrt (x) 4) abc (x)...
alisakim2 alisakim2  20.09.2019 17:00
Дано число х (действительное число). напишите условие проверки принадлежности данного числа промежутку [-5; 5]...

Популярные вопросы