Есть ответ 👍

сколько страниц будет найдено по запросу фрегат | эсминец, если запросов по фрегат&эсминец 500, фрегат 2000, а эсминец 2500?​

254
482
Посмотреть ответы 1

Ответы на вопрос:


var 

  a, b, c: real;

 

begin

  writeln('введите 3 любых числа');

  readln(a, b, c);

  if (a < b) and (a < c) then writeln(a, ' - наименьшее число');

  if (b < a) and (b < c) then writeln(b, ' - наименьшее число');

  if (c < a) and (c < b) then writeln(c, ' - наименьшее число');

  if (a > b) and (a > c) then writeln(a, ' - наибольшее число');

  if (b > a) and (b > c) then writeln(b, ' - наибольшее число');

  if (c > a) and (c > b) then writeln(c, ' - наибольшее число');

  readln; //убрать если среда разработки не turbo pascal

end.

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