Найти произведение 2х максимальных чисел из 3х

Найти произведение 2х максимальных чисел из 3х
Гость
Ответ(ы) на вопрос:
Гость
var x,y,i,min,max1,max2:integer; begin writeln('пожалуйста, введите поочередно 3 числа'); readln(x);readln(y);readln(i); if (x