1. Информатика
  2. Даны три натуральных

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

андрев1 андрев1    3   18.05.2019 23:00    2

Ответы
tigranmesropyan tigranmesropyan  12.06.2020 04:18

2.uses wincrt;

var a:array[1..3];

i:integer;

begin

min:=a[1];

for i:=2 to3 do

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

writeln('min=',min)

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
gerakostya gerakostya  09.06.2019 17:40
Составьте таблицы истинности высказываний: а) (p∧(q∨¬r))⇒q; б) (p⇒q)⇔(¬q⇒¬p)...
ТАПОРИК ТАПОРИК  09.06.2019 17:40
1. проанализировать работу программы для заданных значений переменных x, y, z. определить, какие значения x, y, z будут напечатаны после выполнения программы. начало...
manjester1 manjester1  13.01.2023 11:45
ABCPascal Составить программу, которая каждую встреченную в заданном предложении букву «р» заменяла бы сочетанием букв «ля»....
zagidsadikov zagidsadikov  13.01.2023 12:08
A. Пир на полярной станции Ограничение времени 2 секунды Ограничение памяти 256.0 Мб Ввод стандартный ввод или input.txt Вывод стандартный вывод или output.txt После...
milashkamilana2005 milashkamilana2005  18.05.2019 21:50
Составить программу f(x)=x-sinx отрезок [0,3]...
lenaseredenko lenaseredenko  18.05.2019 20:48
Два игрока, петя и ваня, играют в следующую игру. перед игроками лежит куча камней. игроки ходят по очереди, первый ход делает петя. за один ход игрок может 1) добавить...
zaira1979zaira11 zaira1979zaira11  18.05.2019 20:45
1. вычислите количество часов и минут в n сутках. program 1; uses crt; var n,nh,nm,ns : integer; beginwrite ( введите количество суток: ); readln (n); nh: =n*24;...
Бізнесмен22 Бізнесмен22  13.06.2019 15:20
Водном из вариантов кодировки unicode на каждый символ отводится два байта. определите информационный объём сообщения из двадцати символов в этой кодировке.1)20...
rtrc2002 rtrc2002  13.06.2019 15:20
Назовите получения информации человеком...
pukan03424 pukan03424  13.06.2019 15:20
информационный объем предложения кашу маслом не испортишь составляет 50 байт. определите, сколькими битами кодируется один символ (кавычки не учитывать)...

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