М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации

Найти минимальный элемент массива паскаль

👇
Ответ:
Sania24sania
Sania24sania
04.10.2021

program raf105;

const

 n = 5;

var

 a:array[1..n] of integer;

 i,min:integer;

begin

min:= 10000;

writeln('Вводите числа по очереди');

for i:=1 to n do

begin

 readln(a[i]);

 if a[i]<min

   then min:= a[i];

end;

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

end.

Язык PascalABC
4,7(17 оценок)
Открыть все ответы
Ответ:
Тася221
Тася221
04.10.2021
На языке Java. Программа складывает и отрицательные и положительные числа.

class SumNum{
 public static void main(String args[]){
  try{
   long sumNum=0,numSum=new Long(new java.io.BufferedReader(new java.io.InputStreamReader(System.in)).readLine());
   do sumNum+=numSum;while((numSum>0?--numSum:++numSum)!=0);System.out.print("Результат "+sumNum);
  }catch(java.io.IOException io){
   System.out.println(" - Ошибка ввода!\n"); main(null);
  }catch(NumberFormatException nf){
   System.out.println(" - Введите целочисленное значение!\n"); main(null);
  }
 }
}
4,6(66 оценок)
Ответ:
смурфик15
смурфик15
04.10.2021
ответ 7 стаканов.
подсчитал методом подбора. 
первое взвешивание:2 стакана и 1 тарелка= 1 кувшин. если представить тарелку как 5 стаканов то 1 кувшин =7 стаканов (2+5)
второе взвешивание : 2 кувшина и стакан = 3 тарелки. по пред идущему взвешиванию 1 кувшин = 7 стаканов, значит 2 кувшина и стакан =15 стаканов(7*2+1).<== (на оной чаше весов) 
(на другой чаше) 3 тарелки, если 1 тарелка = 5 стаканам, то 3 тарелки=15 стаканам (5*3). значит 15 стаканов(два кувшина и стакан)=15 стаканов(три тарелки)
значит по первому взвешиванию 1 кувшин=7 стаканов. 
4,7(63 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ