Ввод a,b,с если а=b если a=c как ее оформить ???имеется в виду начало ввод и дальше что

Не забываем про строкуvar a,b,c:integer;//Например можно string, int64, и т.д.//BEGINПо условию выше, мы просто должны ввести три переменных командойread(a);read(b);read(c);или как можно это записать:read(a,b,c);//Вводим три переменныхУсловия, здесь уместно использовать команду if a=b and a=c then //что делать если условие верно//else // что делать если условие ложно//END.