Такие задания в принципе не решаемые, потому, что не указан критерий отбора, значит этот критерий я выбираю САМ, и он может отличаться от того, который имели в виду авторы задачи, поэтому и мой ответ может отличаться от их ответа, но это совсем не означает, что он неправильный.
Ну вот например, со второй группой слов.
Поставим каждому слову в соответствие количество букв в нём.
Дебри - 5
Прения - 6
Игры - 4
Шахматы - 7
И я смело могу утверждать, что лишним является Игры, потому, что это единственное, у которого число букв - полный квадрат.
Но я также могу утверждать, что лишнее это Прения, потому, что это единственное чётное не квадрат,
Но я могу сказать, что лишнее Шахматы, потому что это единственное с количеством букв, равным максимальному простому числу в первом десятке
И т д...
И все мои ответы правильные и уверен на 100%, что не совпадают с мнением авторов задачи.
Поэтому, повторюсь, если чётко не указан критерий сравнения, ответ также нечёткий.
Существует явление под названием «громовая плешь». Это зона высокого напряжения, возникающая после попадания в землю грозового разряда. Пытаясь пройти в этом месте, человек может погибнуть. К счастью, энергетическая воронка в месте попадания молнии существует только в течении нескольких минут.
Во время извержения вулкана Везувия 24 августа 79 года н.э. помимо всем известного города Помпеи погибли также города Геркуланум и Стабии.
Полное солнечное затмение длится не дольше 7,5 минут; полное лунное затмение - 104 минут.
Поделитесь своими знаниями, ответьте на вопрос:
Напиши программу Напишите функцию, которая вычисляет сразу максимальное и минимальное из трёх чисел. (Используйте изменяемые параметры.) Паскаль Очень нужно.
Объяснение:
function min(a,b,c:integer);
begin
if(a<b) and (a<c) then min:=a
else if (b<a0 and (b<c) then min:=b
else min:=c;
end;
function max(a,b,c:integer): integer;
begin
if (a>b) and (a>c) then max:=a
else if (b>a) and (b>c) then max:=b
else max:=c;
end;
var a,b,c:integer;
begin
readln(a,b,c);
writeln('Минимальное значение= ',min(a,b,c));
writeln('Максимальное значение= ',max(a,b,c));
end.