Составить бса и программу определения меньшей из двух величин x и y , где x = 2 × a в квадрате , а y = 3 × b значения a и b вводятся с клавиатуры . x , y и результат обработки вывести на экран.

Блок-схема - в прилагаемом файле.
Программа:
var a,b,x,y:integer;
begin
write('a, b: ');
readln(a,b);
x:=2*a*a;
y:=3*b;
writeln('x = ',x,' y = ',y);
if x<y then writeln('min = ',x)
else writeln('min = ',y);
end.

Пример:
a, b: 5 8
x = 50 y = 24
min = 24