Нужно придумать задачу условие которой содержит слова "если...., то......" и составить блок-схему по решению.
Program my; var a,b:integer; begin read(a,b); if (a>b) then write (a) else write (b); end. Так?